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Conexão MSX 
- impressora 
gráfica 

ANTÔNIO R S. SHALDERS 



Um dos maiores desafios para o usuá- 
rio da linha MSX é, sem dúvida alguma, a 
realização de uma cópia da SCREEN 2 
em uma impressora gráfica. 

Existem dois métodos de se fazer isso: 
o primeiro usa as tabelas da VRAM e o 
segundo testa diretamente os pontos na 
tela. 

O objebvo deste artigo é fazer uma 
comparação em termos de velocidade e 
complexidade dos dois métodos para um 
determinado tipo de cópia. 

Todas as rotinas apresentadas neste 
artigo foram desenvolvidas e testadas em 
um micro HOTBIT e em uma impressora 
Mônica da Elebra. 

ALPTOUT 

Esta é uma rotina importantíssima da 
ROM do seu MSX, pois é ela quem envia 
para a impressora o código do caracter a 
ser impresso. Para podermos utilizá-la 
corretamente, é necessário o uso de uma 
pequena subrotina em linguagem de má- 
quina. E, mesmo que você não lenha ex- 
periência no assunlo, irá entendê-la fa- 
cilmente. 

Existe um registrador do Z-80 chama- 
do "acumulador" ou, simplesmente, re- 
gistrador "A". A LPTOUT enviará para 
a impressora o código do caracter que es- 
tiver armazenado no acumulador, quando 
este for chamado através de um CALL, 
que é análogo a um GOTO do BASIC. 

Para armazenarmos no acumulador um 
determinado valor, fazemos uso da ins- 
trução LOAD, que significa "carregar". 
A sintaxe desta instrução é LD A.XX. 
Feito isso, devemos chamar a rotina com 
um CALL relativo ao seu endereco de 
entrada, que, no caso da LPTOUT, é 
00A5H. 



Em último lugar, deverá haver o re- 
torno ao BASIC, o que é feito quando a 
instrução RET (RETURN) for executada. 

O nosso programa, em linguagem de 
máquina, ficará assim: 

EOOO 3EXX LD A.XX 
E002 CDA500 CALL 00A5H 
E005 C9 RET 

A primeira coluna é relativa aos ende- 
reços; a segunda às instruções em hexade- 
cimal; e a terceira, aos menemônicos do 
Z-80. 

O endereço inicial da rotina foi defini- 
do com EOOOH por ser uma posição de 
memória relativamente alta e não reque- 
rer maiores cuidados na maior parte dos 
programas em BASIC. 

Para chamarmos a rotina através do 
BASIC, basta definirmos em uma chama- 
da USR seu endereço de entrada, por 
meio de um DEF USR. 

Feito isso, basta pokearmos em E001H 
o código do caracter desejado e acessar- 
mos a rotina através de uma declaração 
USR, como, por exemplo, um 
G = USR(0). 



A CÓPIA 

Para entendermos como o primeiro 
método funciona, é necessário fazermos 
um pequeno estudo da VRAM do MSX, 
quando em SCREEN 2. 

Existem duas tabelas fundamentais pa- 
ra o nosso caso. Estas são a de padrões e a 
decores. 

A tabela de padrões sontém a imagem 
propriamente dita, inicia no endereço zero 
e termina em 6143. 



Os pixels do vfdeo estão organizados 
de acordo com o esquema da figura 1, 
dispostos horizontalmente em octetos na 
seguinte ordem: o primeiro é formado pe- 
los pixels relativos às coordenadas 
(0,0)... (1,7), até o oitavo, que representa a 
sequência (7,0).. .(7,7). O nono octeto é 
representado por (8,0)... (15,0) e assim su- 
cessivamente até o último octeto, de nú- 
mero 6144, que corresponde ao grupo 
(248,191)...(255,191). 

Cada um desses octetos pode ter so- 
mente uma cor, que está armazenada em 
uma tabela específica, que inicia em 8192 
e, também, tem 6144 bytes de compri- 
mento. Se mudarmos a cor de um único 
elemento de um octeto, a cor do octeto 
inteiro será modificada. 

Aliás, este é um dos poucos defeitos 
do MSX! 

O que esse primeiro método faz é jus- 
tamente pequisar essas duas tabelas e, 
após tratar corretamente os dados, haver 
a impressão. 

Voltando a examinar a figura 1, po- 
demos notar que os bytes relativos a cada 
octeto estão dispostos na horizontal, e is- 
so nos gera um grave problema: quando a 
impressora entra em modo gráfico, ela é 
informada que lhe será enviada uma ca- 
deia de n caracteres e estes deverão ser 
impressos no formato binário, que irá 
acionar uma determinada combinação de 
oito agulhas. O problema é que essas agu- 
lhas estão dispostas na vertical, sendo a 
agulha superior correspondente ao bit 
mais significativo e a inferior ao menos 
significativo. 

A maneira mais fácil de -contornar o 
problema é fazendo uma impressão na 
vertical. Basta fazermos uma varredura 
adequada da tabela de padrões e imprimi- 
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la. Examine o programa da listagem 1. A 
varredura usada é justamente para este ti- 
po de impressão. A variável j contém o 
endereço de cada octeto a ser enviado pa- 
ra a impressora. 

O programa da Listagem 2 usa este al- 
goritmo que agora lhes será explicado em 
detalhes. 

As duas primeiras linhas do programa 
montam a nossa rotina em linguagem de 
mA]ninn na memória, a partir do endereco 
EOOOH, definindo o endereço de entrada 
da chamada USR. 

Na terceira Linha, a cor de fundo da te- 
la é armazenada na variável F% e a linha 
60030 faz com que a impressora passe a 
trabalhar em modo EPSON, ajustando a 
entrelinha para oito pontos. 

A linha 60050 faz com que a impres- 
sora entre em modo gráfico, esperando 
sequências de 192 caracteres. 

Os loops fornecem a sequência correia 
de impressão dos octetos, sendo esses po- 
keados pelas variáveis J%, Sl% e RP%, 
respectivamente. 

É feita, então, a comparação com a cor 
de fundo, que decide ou não a impressão 
do octeto. 

A chamada da LPTOUT 6 feita na li- 
nha 60090 e o CHR$(1) na linha 601 10 
faz o avanço da linha, assim que a 
sequência gráfica tenha sido completada. 
A última linha faz com que a impressora 
volte ao modo normal de operação. 

Observe que o programa da Listagem 2 
não copia SPRITES, pois. para isso, seria 
necessária a consulta das tabelas de for- 
mação e cores dos SPRITES. 

Já pelo segundo método, as coisas fi- 
cam muito mais fáceis. Além de qualquer 
coisa ser copiada, a rotina é muito mais 
simples e objetiva. Basta fazermos uma 
varredura de todos os pontos do vídeo, 
através de dois loops e testar se a cor de 
fundo é igual à cor do ponto. Isso é feito 
com o auxílio de uma das funções menos 
utilizadas no BASIC - o POJNT -e, nem 
por isso, é pouco eficiente. 

Cada ponto aceso na tela irá disparar 
uma agulha e a entrelinha será alterada 
para 1 ponto. O teste dos pontos é feito 
na linha 60070 da listagem 3. O restante é 
idêntico ao programa anterior. 

O primeiro método leva uma pequena 
vantagem quanto ao tempo de execução, 
mas convém citar que isto só é verdadeiro 
para uma impressão vertical c de di- 
mensões 192x256. 

A impressão horizontal já 6 bem mais 
difícil de se conseguir, pois o algoritmo de 
rotação da tabela de padrões é bem com- 
plexo, sendo a varredura radicalmente di- 
ferente para o primeiro método. Chama- 
remos cada grupo de oito octetos conse- 
cutivos de "'grupo local"'(Vide figura 2). 



LISTAGCM 1 

10 FOR C=0 TO 31 
20 H-C*8 

30 FOR L- 23 TO 8 STEP -1 

40 K-256*L+H 

50 FOR X-7 TO 0 STEP -1 

60 J-X+K:PRINT J 

70 NEXT X.L.C 

LISTAGEM 2 

50000 ' COPIA VERTICAL NORMAL (MSX) 

50001 ' ANTONIO FERNANDO S. SHALDERS - 
1988 

60000 DEFINTA-Z : FOREN-0TO5 : READCO : POKEl 
HE000 + EN.CO-.NEXT 

60010 DATA 62, 0.205, 165, 0 , 201 : DEFUSR-1H 
E000 

60020 F»PEEK (S.HF3EA) 

60030 POKE&-HF417,l:LPRINTCHRS(27) ;"A";C 
HR$(8) 

60040 FORC-0TO31 :H-C*8 

60050 LPRINTCHR$(27) ; "K" ; CHRS (192) ; CHR$ 
(0) ; 

60060 FORL=2 3TO0STEP-l:K-256*L+H 

600 70 FORX-7TO0STEP-1: J-X+K : SL=VPEEK ( J) 

:RP-VPEEK(J+8192) 

60080 IFRPMOD160FTHENPOKELHE001 , 255ELS 

EPOKE!.HE001,SL 

60090 G-USR(O) 

60100 NEXTX , L 

60110 LPRINTCHRS í 10) ; 

60120 NEXTC 

60130 LPRINTCHRS (27) ; "A" ; CHRS (13) : POKE8. 
HF417 r 0 

LISTAGEM 3 

50000 ' COPIA VERTICAL NORMAL (MSX) 

50001 ' ANTONIO FERNANDO S. SHALDERS - 
1988 

60000 DEFINTA-Z : FOREN-0TO5 : READCO : POKE&. 
HE000+EN,CO:NEXT 

60010 DATA 62 , 0 , 205 , 165 , 0, 201 :DEFUSR=LH 
E000 

60020 F=PEEK (&.HF3EA) : POKE&.HF41 7 , 1 
600 30 LPRINTCHRS (27) ;"A";CHRS(1) 
60040 FORXX-0TO255 

60050 LPRINTCHRS (27) ; " K" ; CHRS (192) ;CHRS 
(0) ; 

60060 FORYY=191TO0STEP-l 
60070 IFPOINT {XX , YY) =FTHEN60 090 
60080 POKE&.HE001 , 1 :GOTO60100 
60090 POKE8.HE001.0 
60100 G-USR(O) 

60110 NEXTYY : LPRINTCHRS (10) ; : NEXTXX 
60120 LPRINTCHRS (27) ; "A" ; CHRS (13) : POKE8. 
HF417.0 





TABELA DE PADRÕES DA SCREEN 2 
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FIGURA 1 







GRUPO LOCAL (FORMADO POR 8 OCTETOS CONSECUTIVOS) 

p 8 OCTETOS VERTICAIS ^ 

MSB LSB 
2 1 26 25 24 23 22 2> 20 




















BYTE 8 x n 

ocn 

BYTE 8 x n + 1 — 


:tos 




















































































































FIGURA 2 


(n - número natural entre Oe 767) 



O nosso objetivo é tomar os octetos 
reais em octetos verticais, o que é conse- 
guido agregando -se -os bits de mesmo pe- 
so de cada um dos octetos reais; o primei- 
ro ocleto verticaJ será formado pela con- 
caienação dos bits mais significativos dos 
octetos reais, e assim sucessivamente. 

Se usarmos um método numérico para 
tal, a rotina se tornará extremamente len- 
ta. Por isso, faço uso de um método alfa- 
numérico, pois, além de ser muito mais 
rápido, é compacto. 

O programa da listagem 4 faz exata- 
mente isso, A matriz alfanumérica BS.de 
dimensões 8x1, contém as strings binárias 
relativas aos oito octetos, sendo trans- 
formada na variável US em um octeto 
vertical. 

O resultado é armazenado no acumu- 
lador, sendo, poste rio nnen te, impresso. 

O programa da listagem 5 faz o mes- 
mo tipo de cópia, usando o algoritmo do 
segundo método, sendo muito mais efi- 
ciente. Este programa não passa do mes- 
mo programa da listagem 3 com os loops 
alterados. 

A AMPLIAÇÃO 

Para fazermos uma ampliação, o pri- 
meiro método se torna extremamente ine- 
ficiente. 

No caso do primeiro método, se dese- 
jarmos uma impressão multiplicada por 
um fator de dois, teremos que ampliar um 
ponto dilatando-o na horizontal e na ver- 
tical. 

A expansão na horizontal é trivial de 

zes seguidas cada octeto. Mas para am- 
pliarmos na vertical, esbarramos em um 
problema: o código do octeto expandido 
passará a ler 16 bits e a impressora só tem 
oito agulhas. A solução é quebrarmos esse 
código em dois menores de oito bits. en- 
viando primeiro para a impressora os oito 
bits mais significativos, e, em seguida, os 
oito menos. 

O raciocino é o mesmo para am- 
pliações de fator 3 em diante (só que o 
primeiro método só permite ampliações 
múltiplas de 2). É como se a palavra 
"MSX" fosse transformada em 
"MMSSXX", "MMMSSSXXX", e assim 
por diante. 

Os programas da listagem 6 e 7 fazem 
isso pelo primeiro método e os restantes 
pelo segundo. 

O segundo método é muito mais ade- 
quado quando sc trata de cópias que re- 
querem algoritmos mais sofisticados e são 
muito mais rápidos e fáceis de serem 
compilados, pois até o compilador 
COMP32 6 capaz de fazé-lo. 

Por último, serão dadas tabelas para 
auxiliar a alteração do programa básico 
do segundo método para obtermos cópias 
ampliadas por um fator n e como fazer 
reversão de impressão para cada tipo. 
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L1STR6EN 4 

50000 ' COPIfi MtltttT». «S*. «SB 
5000! ' RNT0NI0 -EÍNfiNOG S. SnF.lERa - 
'933 

40000 OEn»T«-Z:r5ÍES-0TO5:S733C0: , j<fí 
8E000*EN,C0:)iEXT 

40010 DR7R 62,0, 205, "65,0,201 :0EFOSR=S n 

E000 

40020 F"ffKIIHF3EffllWIE«lí«?,l 

40030 LHBTCS»127)t"»"tOM«i 

6C04Õ F0«L=0T023:M56«L 

40050 JVWCm(2?)f1*;QW0>!CHU<; 

I] 

40CÍ0 F0)r=0T0248STE>S:a'<tC 

40070 FCR>=0 T 07:j--X»r. 

400Í0 SitX>=vPEE.<<J:iP=t/PEE<(J*8192; 

40090 S^SIXI=SIS I -Tt: , 3 T S!KSS(a."0-)*í IN5 

(SKXll.B) 

40100 IWMíl«)fISBUI«)-III«(2K! 

40110 »EXTX 

40170 F0RX=0T07:=X<" 

40130 SCMIlõSISitlíl.B,' imlõKSlJli), 

F,:»«ns(SLS(2>,a,::<'.i3S(SLSi3i,fl,')t 

HI9*<SLt(t>,D,:)<n:9*(SLtCS) > ll > l)*KUS< 

S.!l41,a,'K";0S(?.l(7),3,') 

60 4C 5C*UR.("46"tSCSl 

40150 «MWOÍi.fC^.aiO) 

»: óo iexn^:L>ji*iOM(!«j* : .<:. 
60170 .>!!««,', •i' I wic;n»aa 

IÍ417.0 



.ISTBSEÍ 5 

50000 - co?;s ,anwiu «m. tm> 

50010 ' «MIC -iWWe 5. iAOEió - 

60001- SSFBÇWIfSKW-iHrtSBttlHIIia 
íEOOOtEtí.CC^EXT 

610 í Jfi T R 62,0,205,165,0,20" :3E:" u 3«=Sr 
£000 

60020 ->JFE<iS.v"3ESl:»3^ESr. ; í"7,' 
60030 l«Kjfe8»ií»);^SWff!l 

60010 ; siry=oir.;ç- 

60050 .?;;,:.-;í(27i i -!",C6í!íoi;Chís(1 

>; 

60040 FCixXM)T02?5 

40070 [FPOi»IiXX,Y'':=-THEI,60090 

60080 HKWEOS1, 1:337060100 

60090 nwem.í 

60100 G=ilS!(0) 

sono mmMiiiSimwtmm 

61120 LPH INTCK9K 27 ) ; "R " j ->BS C, 3) : 
HF4l7,0 

LlSTflGE.1 6 
50000 • COPIFi nOilZOUIfiL BAPlIBOÍ M3X) 
50O1O ' RKT0K1O FER«IM>0 S. SrtflLOE.lS - 
1938 

60000 D£F]NTS-Z:F5ÍÊS=0105HE5ÍC5:?0í:S 



KC5»BI,BmSH 

600 3 0ST3 62,0,205,165,0,201 IJÉFUSJ-tt 
E000 

60020 F=P'E»(SH r 3E3):?0«E!HF<'?,l 
60030 LP«INI»RS(271; , 'f;i:H«S(31 

60040 mMnraw 

60050 F08^0TC23:«=2561.:-G!T'1T02 

60240 LMWRMaWIiViBdlIttíjSsllS!! 
1; 

60070 -"0RC=OTO248STE?S;-í*C 

60090 FMX=0Tt)7:J=X*K 

60090 SL{X)=»PEE.<lJ):JP=0PEE.(; J *Bl92) 

60100 SLÍlXMHBtmSaiNSKS,"'"'** 

(SL(X)),ai 

60H0 IFRPMD5i6<>FTHEJSiS(X>=SIilS(255> 
60.20 «EXTX:FO»X=0'07:»'X»l 

60>;o scs=íios(Sl5;:),=,:)*iii35(Sl1(;), 

B,l)*lllDi(Si.S(2>,fl 1 i)«ÍDS(3._i(3),fi,1H 

«13S(SLil4),B,l)*í!3S(SLS(5),fl,')*íl3l( 

S-J<6),a,;>*M0i(SLS(7!,3,l) 

60140 XMtl3!;SCS,R(7),4l:FCja=lT04:CS= 

hiOS(X!,S,l):YS=yS*CWS:!(EXTB 

40150 rWi6HTKYi,8i:r»vu.eu"*»ii 
40; 6o ■ranr , 1 1 g=usr io i :g=5SR 101 

40170 HEm,C!|íí!«TOWIO>|!«(ÍT,l 
40180 t P«!NTCHlI(27);"R ,, ;CHI!ll3):?0«ES 
KF417.0 

LISTAGEM 7 

50000 ■ copib <mt». mjm am 

50010 ' FÉTCNID FFRMfiN30 S. SHHLDE8S - 
1988 

40000 3EF1KT B-?:F0í E»=0 TO 51RE3D CO: 

PME SKE0O0*E«,CO:KEXT 

40010 OBTfl 62,0,205,165,0,201:BEFUSR=ia 

EO00 

60020 F=PEEI(SHF3Efi]:?ríE SHF417.1 

60030 LPRlkT CHRS(27); , 'fi';CHRl(8) 

60040 Kl)=l:R(2)=5 

60050 FOR C=0 TO 31:FEi T=i TO 2:n=CIB 

60060 LPRÍKT «rW<7)|X,a«0»|W 

S(l)j 

60070 FOR L=23 TO 0 STFP-1 :K=256»LtB 

60030 FOR X--7 TO O STEP-l:J=XM:SL(T)=il 

PEEK(JI:RP(T1= I J»EFÍ(J*8192) 

60090 SUIT>»«ISai(SBllll!ll8,TMDB 

(SL(T)),6) 

60100 IF »n «3 14 O F THE» SU(T>> 

60110 XS(T)=M0SÍSUÍT],Rm,4):F0< 8=1 
TO 4.-CS(T)=H10t(XS(Tl,fl,l) 
60'20 Y$lTl=»Sm*CSlT)»rj(T):«EXT fl 

40:30 ttm=»i»tt«Mm,8)!»(twa.("i 

8"*Y!(T)I 

40140 FOSE S8E00i,Y(T):E=USI(0):3'uSl(0 

60150 NEXT X,.:l?SI«T CHISC01;:SEXT T, 
C 

60160 L?RI»T CaRS127) i -fl , ' ! CHRI(13K?0ÍE 
SHF417.0 



50000 C3P18 .EUTICO a«?_iíOS (ffiX) 
5OC0 ' RKT0I1I0 -7ÍMKJ 5. ánSUFJS - 

mi 

60000 3£FI*7a-Z:ÍOaE»=OT05:.!:F.OCG:POrfii 

n-:ooot;»,cc:o7 

40010 3ST3 62,0,205,:45,0,201:3E-'JSR=S B 
•000 

40030 _-S;NTCwRI(27) ; "" ; CHRS<c. 
400»0 r 3RXX=07G255 

4oo:: jwtman,v&mmfiiM 

'■>: 

60040 FGRYY=0700S7t?-l 

40070 ;F>0:»T(XX,YY)=FTBE«400?0 

400EO pgcsíeooi, :133704010o 
•0090 poKSh-:;:' ,o 
60-oa wisikdimskm 

401 10 KEXTVT !- J RI57ChJJ( I 0) ; 1KEXTXX 
4017C L 3 Jl»7M!;27);"a";C-i!(!3):?BKE! 
nr417,0 



50000 ' C07IF MMH MMM WS» 
5007 0 1 TNT0NI0 FERNRN00 S. ShflL3£.íS - 

60000 3FFI»7F-Z:FOI1E«=0705:!ESOCO. , ?OÍES 
SEOOO»E»,CO:NEX7 

60010 3B';i 62,0,20I,liS,0,20llOEnl3j4» 
E000 

40020 F*PEF<(S«F3ER):»0<Í8HF417,; 

60030 u , iam3M(27)(-S" i aiSfta 

60040 FWHMTDJ?! 

60050 LMIW!3«lt27),V|a*l(«(B«$l2 
); 

60060 FGRXX=0-Í255 

40070 I-"»0!k;(XX,ÍY)=F7»E«40090 

600Í5 J «FfcjF.001,3!G070401CÕ 

60090 »0«E»nFOO?,0 

60100 MSRiOCSUSIO) 

40110 «a7XXlL'Rl«7Cr«;:0);:»EX-"Y 

40120 -?JI»TW!(27) 1 ,, 3 ,, ;Ca!(131:'0«EÍ 

HF417.0 
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ELTFRRÇÕFS 3E TRHRNHO 

■«s « um» 3 

3X 0E RUMTD 

40030 l?M7 CKÍSI27);"R"-CK 
RS(3) 

60060 mm cnontXiCH 

Rs(44>;CKRi<2> 

40080 m «itMt,7(H?0 40' 
00 

60'00 FOR S=- '0 3:G=tlSR(01- 
KEXT S 

4X OE RGHEN70 

60030 I.PRIN7 CHRS(27);-fi-;Cti 
R514) 

60050 LPRIH7 ™i(27): ,, S - l Cri 
RS(0)|MS(3); 

4008Õ P0<F SHE001,15:SGT0 40 

100 

40100 FOI S=l 70 4:g=uss;oi: 
»EX7 S 



40030 -PRIN7 Ca!SÍ27) l "!";C- 
tt(i) 

S0050 imm CHJt(»>|K"|CH 

40080 PGr lh£00i,43:6OT0 40 
100.. 

4oic: .-33 m ri mmw 

NEXT S 



5JFS3Ç5FS 3F TSB3Ni-Q 
?aíB R JSTÍ1GE; 5 

3X PE RMTO 

40030 LRR1K7 ;iiRS!27):"R 
"■CHSíOÍ 

60050 irsiNT camm-:" 
■,CHtí«).OIIK3)j 
60080 PGKF U£001,?I80TG 
60100 

40100 F08 S=l TO 2:G« 
(0>:«EXT S 



60030 lllM Cnli(27), ,, a 
"■3HRS(51 

60050 -PR1K7 C.HRK27); '< 
■■;CKRS(01;Ca«!(5); 
60080 POXf IRE001 ,31 1807 

60-00 FOR S='. 70 5:G=USR 
lOliN-X* S 

6X 3E Wtm 

4OO30 i*UT OM«7>|"ll 
" ; C«RI141 

40050 LPR INT CH!tt27)|"< 
, ';WR!(0);CHRJ(4); 
40080 POiE SrFOO' ,43:G07 
3 40100 

40100 'BR 5=' 73 6i3=JSR 
<0):KEX7 S 

"3E.Í 3 

MÉTODO 0E IWERSS 
[iíPRFSSÍO REOERsai 
LISTAGENS 3 E 5 



5X 3E MMEKÍQ 

60030 LPtHB CHJS(27) i "a";3^ 
RS(5) 

60050 .'71*7 CnRJ(27):'T';Crt 

R!r92iiCtRSÍ31; 

40050 --Cif íhEOOl ,31 1S0TG 40 

'00 

4C100 FÍR S=l TO 5:3=liSR(01i 
KEXT S 



4X 0E auiíEflTO 

60030 ifM CHRS(27I;"= 
";ChRSÍ4) 

40050 JR1KT CRn(27)|*I 
■jO»«);B«W)| 
60080 m SHE001,15:GGT 
G 60100 

60100 FOR S--" 70 <:5=3SR 
(0HKEX7 S 



600EO m !r.E001,l 
GOTO 60'00 



POR! 

60060 P0<F SKE001.0: 

3070 40100 

40090 POXF SHE001,! 

0!3: BflSTfl INW7R7ER- 
«0S OS 0RLORES R SE- 

ríii umzBMgs mg 

FCoíUlRDGR (POKES). 



Os Vírus 
Binei rius 



j digitando um programa, 
aí, que já ia ligar a CPU 



Esta seção se propõe a apresentar a 
vocês assuntos gerais, de uma maneira in- 
formal, sem a utilização de linguagem dc 
programação ou outros artifícios que fa- 
çam vocês, leitores, correr para o micro, 
apertar o botão de liga/desliga e perder o 
resto de suas vidas na frente do monitor 
de vídeo procurando uma solução para 
um proble: 

Epa! V 
(apelido c 
MSX)! Resista à tentação! Volte! 

Bom, muito bom... 

O que eu proponho aqui é discutir 
qualquer coisa interessante que, as vezes, 
não damos muita importância. Vejamos. 
Alguém já ouviu falar de um tal Pascal? 
Não a linguagem, mas um certo senhor 
Blaise Pascal. Qual foi o primeiro compu- 
tador eletrônico construído? Quem des- 
cobriu o Brasil? Decerto não foi um mi- 
crocomputador! 

Vamos tentar falar sobre algo relacio- 
nado à informática, mas não com progra- 
mas, rotinas, ele... 

Não sei se vocês ja" ouviram falar do 
"VÍRUS BINARIUS". Com o apareci- 
mento do primeiro computador, este ser 
foi acidentalmente criado. Não seguiu os 
passos evolutivos de outras criaturas nem 
caiu do espaço num disco voador. Este 
pequeno ser, vejam vocês, não é nem 
mesmo constituído de matéria, é total- 
mente invisível, mas contaminou o mundo 
todo. Ele pode estar, agora mesmo, incu- 
bado no seu micro. Ou pior: você pode já 
estar contaminado por ele!!! 

Quantos de vocês não perdem horas 
sentados à frente do micro digitando, jo- 
gando, ou mesmo olhando para o micro 
DESLIGADO, como se este fosse um 
troféu? Eu mesmo não pude resistir a es- 
crever este artigo usando um proccssiidor 
de textos num MSX, vejam só! 



orial c 



í ' Mm 



- Espera um pouco... 

Enquanto isso, as mãos se dirigem au- 
tomaticamente para um teclado e, após 
alguns RETURNs, BACKSPACEs e ou- 
tros mais, responderão: 



ANDRÉ L. F. DE FREITAS 



- Cento e vinte. 

Certo. Mas porque usar o micro? 

A resposta é simples: não eram vocês, 
mas os VÍRUS BINARIUS. Portanto, 
cuidado! Eles estão em toda parte, em to- 
das as teclas, cm todo o foton disparado 
de um monitor de vídeo para dentro dos 
seus olhos. Destino final: o cérebro hu- 
mano. Aí não tem mais solução. A conta- 
minação 6 total e pode causar muitos pro- 
blemas com os amigos, com a "patroa", 
com os filhos e, até, com o papagaio que, 
dc uma hora para outra, só saberá falar 
RUN, RUN, RUN... 

A cura ainda não foi encontrada, mas 
dizem que, após uns dois anos longe do 
micro, um computador jogado fora, todas 
as listagens de programa incineradas e, 
quem sabe, uma lavagem cerebral, o VÍ- 
RUS BINARIUS volta a incubar e hiber- 
na por um bom tempo, só voltando à ação 
ao sentir a proximidade de um micro- 
computador. As vezes, nem isso funciona, 
como é o caso de uni amigo meu que nem 
mais sequer consegue andar em linha re- 
ta... 

Isto tudo descrito acima é uma brinca- 
deira. O VÍRUS BINARIUS não existe 
(será?!), mas o que eu pretendo com bio é 
" " ir de coisas diferentes, dc 
agradável, como havia dito no 
início do artigo. Esta é uma revista com 
autores ainda não conhecidos pelo públi- 
co, mas excelentes programadores e pos- 
suidores do nosso tão amado MSX. Pes- 
soas como vocês, que se propuseram a 

Uma revista dedicada a todos aqueles que 
amam a programação e, principalmente, o 
MSX. Espero que a idéia agrade c que es- 
ta seção possa ter grande utilidade na vida 
de todos vocês. 

Daqui em diante, procuraremos explo- 
rar os mais variados assuntos e curiosida- 



Existindo ou não, o VÍRUS BINA- 
RIUS irá passear pelo seu computador, 
numa aventura emocionante, onde ele 
será o vilão e você o mocinho. O cenário 
não poderia deixar de ser outro: o seu 
computador c periféricos. 

Aguarde os próximos números. 




Transfira seus 
programas de 
disco para fita 
e vice-versa 



MARCELO FONTOLAN 



Grande parte dos usuários da linha 
MSX está passando seus arquivos de fita 
para disco, pois os discos oferecem maior 
rapidez e segurança no armazenamento de 
dados. 

Quando o programa a ser gravado em 
disco for em Basic, não teremos dificul- 
dades para efetuar a leitura da fita e 
gravá-lo no disco. 

Em se tratando de programas escritos 
em assembler, a operação exige um pouco 
mais de cuidados e atenção, principalmen- 
te no que se refere aos endereços. 

Visando facilitar este trabalho, publi- 
camos um programa cuja função é ler um 
programa da fita cassete e gravá-lo no 
disco ou Vice-versa. 

Programas que estejam gravados em 
fita com proteção, ou" seja, sem header, 
não poderão ser transferidos para o disco 
com o auxílio deste programas. 

Pensando na necessidade que o usuário 
possa vir a ter, o programa também pos- 
sibilita transferências de programas de 
disco para fita cassete. 

O funcionamento do programa é bas- 
tante simples. 

FUNCIONAMENTO 

Ao completar o carregamento, é apre- 
sentado um menú com três opções, que 
permite selecionar qual a operação que 
deve ser efetuada. 



CÓPIA DE FITA PARA DISCO 



No menú, após selecionar a opção 1, 
prepare o gravador e pressione uma tecla. 
Será, então, lido o header do programa e 
serão apresentados na tela os endereços e 
os comandos para leitura dó programa da 
fita e gravação no disco. 

Conhecidos os endereços, retorne a fi- 
ta até o início e posicione o cursor no co- 
mando para leitura, pressionando RE- 
TlíRN. Será iniciada a leitura. 

Terminada a leitura, posicione o cursor 
no comando para gravação no disco, 
pressionando, novamente, RETURN. 

O programa lido das fita encontra-se 
gravado no disco. 

Alguns erros podem acontecer durante 
este processo, como erro de leitura (pro- 
blema com a fita, volume, etc), erro de 
gravação (disco protegido, não formata- 
do, etc.) e caso o programa não seja do 
formato assembler. 

Todo programa em BASIC [em sua 
área na memória a partir do endereço 
&h8000, sendo que alguns programas em 
assembler também possuem o mesmo iní- 
cio. 

Neste caso, haverá a necessidade de 
carregar o programa após cada trans- 
ferência. 



A necessidadae de um novo carrega- 
mento será informado pelo próprio pro- 
grama, através das mensagens "TECLE 
F4" e "TECLE F5", para os casos em que 
o arquivo copiado se sobreponha ou não, 
respectivamente, ao copiador. 



CÓPIA DE DISCO PARA FITA 

Ao solicitar transferência de disco pa- 
ra fita, será apresentado o diretótio do 
disco e solicitado o nome do programa do 
qual se deseja efetuar a cópia. 

Na tela, serão apresentados os coman- 
dos para leitura do programa do disco e 
gravação em fita, já com os endereços. 

O cursor deverá ser posicionado no 
comando para leitura e depois no coman- 
do para gravação, prestando-se atenção 
para que o gravador esteja pronto para 
efetuar a gravação. 

O PROGRAMA 

O programa está dividido em subpro- 
gramas, a fim de facilitar a compreensão. 

A rotina em linguagem de máquina 
efetua a leitura de header do disco ou da 
fita e está presente no programa através 
das linhas DATA. 

Este programa, devido à sua função, 
só opera em sistemas que possuam unida- 
de ilc disco. 
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CPU 



0 ' Marcello Fontolan 

1 ' Itajai, 25 de janeiro de 1988 

2 ' HTPEB COPT 

3 ' Copiador disco-fita-Disco VI -0 
10 ' Limpa tela 

20 CLS:*ET0f F :SC«EEM0:Cr)L0Rl 5,1,1 
30 ' Define teclas de funcao 
40 FOR M TO 3: KEÍ F,": «EXT F 
50 F0« F=6 10 10: KEY F,"i NEX1 F 
40 KEY 4,"RUN"tCHRI(34>*"HYPER-*CHRI(34 
HCWN13) 

70 KEY 5,"RIJN"tCHRS(13) 

80 ' Apresentação do Menu principal 

90 PRINT " 

- : LOCflTE 0,1: PRINT "! 

!-: LO 

CATE 0,2 : PRINT ".— 

100 LOCATEI.I : PRINT" HYP 

El COPY 71.0 — -■: PRINT : PRINT : 

prini 

110 PRINT: PRINT TflB(lO) "Digite:" 
120 ' Opcoes do Henu 
130 PRINT: PRINT TflB(S) "1 — ) Copia de 
Disco p/ Fita" 

140 PRINT: PRINT TH«(5) "2 --) Copia de 
Fita p/ Disco" 

150 PRINT: PRINT THB<5) "8 — ) Sair" 
140 A$=INKEYÍ: IF 81="" THEM 140 
170 ' Hnaliza opcao desejada 
180 IF RS="8" OR Ai="b" THEN END 
190 IF RI=T THEN 230 
200 IF AS="2" THEN 880 
210 SOTO 140 

220 ' Copia de Disco p/ Fita 
230 CLS 

240 PRINT " Copia de Disco p/ F 

ita 

250 ' Hpresentacao do diretorio 
240 PRINT: FILES 
270 ' Espera noxe do arquivo 
280 PRINT: PRINT : LINE IKPDT "Digite o 
nome do arquivo: ";NS 
290 ' Desvia programa caso tenha erro 
300 ON ERROR SOTO 670 
310 ' flore arquivo 
320 OPEN NJ FOR INPUT flSll 
330 ' Obtém dados sobre o arquivo 
340 F=ASC(INPUTS(1,I1I> 
350 IF F0254 THEN 790 
340 XI=[»PUIS(ó,«i) 
370 ' Fecha arquivo 
380 CLDSEI1 

390 ' Calcula parâmetros 
400 CLS 

410 Pi»(flSC(»I0I(XI,2,l)))l254«flSC(NI0 
$1X1,1,1)1) 

420 PF=<flSC(»lDS(XS,4,l ) ) H254*(ASC(rllD 
•<XI,3,1»> 



430 PE=(flSC(«IDS(Xt,6, 1 )) )l254*(flSC(rllO 

l(XÍ,5,l))) 

440 T»=(PF-PIH1 

450 ' Transforma dados decimais eu Hex. 
440 Tr1l=RISHTH"0000"*H£XS(Trl),4) 
470 PIS=HfXI(PI):PFI=HEXl(PF):PEI=HEXI( 
PE) 

480 ' Apresenta dados sobre o arquivo 

490 PRINT "Arquivo Í"]M 

500 PÍINT "Formato :";: IF F=254 THEN P 

RINT"flSSEHBLER" 

510 PRINT "Endereco Inicial : ir.ru 

520 PRINT "Endereco Final : SK";PFI 

530 PRINT "Ponto de Execução : ÍH":PEI 

540 PRINT "Tamanho : ÍH";TrlI 

550 ' Apresenta comando de leitura 

540 PRINT: PRINT: PRINT "81oad";CHRI(34 

l:NI;CHR»(34> 

570 ' Apresenta comando de gravação 
580 PRINT: PRINT "8save";CHII(34) ; "CAS: 
■•;LEFTI(HI,4) i CHRS(34);",SH";Pll i ",lH"i 
PFIj-.SH^PEI 
590 P«INT:P«INT 

400 ' Apresenta tecla a ser pressionada 

410 IF PK37000! THEN PRINT "Tecle 'F4' 

." ELSE PRINT "Tecle 'FJ'." 

420 ' Coloca o cursor em posição 

430 I0CATE 0,7 

440 ' Termina a execução 

450 EN0 

440 ' Tratamento de erros 
470 CL0SEI1 
480 CLS 

490 PRINT" Tratamento de Erros 



700 PRINT: PRINT 

710 IF ERR-42 THEN PRINT " 0 Drive espe 
cif içado nao existe !" 
720 IF ERR=54 THEN PRINT " 0 Nome do ar 
quivo esta incorreto !* 
730 IF ERR--40 THEN PRINT " 0 Disco esta 
com problema de formato !" 
740 IF ERR=53 THEN PRINT " 0 Arquivo na 
o existe !" 

750 PRINT: PRINT " Tecle algo para cont 
inuar ..." 

740 HI=INKEYI: IF AS="" THEN 740 
770 RESUHE 20 

7B0 ' Tratamento de arquivos nao BSflvE 
790 CL0SEI1 
800 CLS 

810 PRINT" Tratamento de Erros 



820 PlINTi PRINT 

830 PRINT " 0 Arquivo especificado nao 
se encoltra gravado com o BSflVE do MSX 
DISK BASIC!" 

840 PRINT: PRINT " Tecle algo para cont 
inuar ..." 



850 «t=MUf. IF M=" THEN B50 
860 6010 20 

870 ' Copia de Fita p/ Disco 
880 RESTOS! 890 

890 OflTfl CD,E1,00,08,21,00,CO,04,10,E5, 

C5,CO,E4,00,C1 ,E1 ,0a,77,23,10,F4,C0,El , 

00,08,21, 10,CO,Õ6,04,E5,C5,CD,E4,00,C1, 

E1,D8,77,23,I0,F4,C9 

900 ' Arnizni dados n RSSENBLER 

910 FOt P=0 10 42 

920 RERD 01 

930 P0XE (IHE050).P,vRLniH"»flS) 

940 «EXT P 

950 DEFUSR=SHE050 

940 DEFFNP£(X)=P£EKU)*254IPE£«(X*1) 
970 ' Apresentação 
980 C15 

990 PRINT ■ Copia de Fita p/ Di 

sco — " 

1000 PRINT : PRINT " Prepare 

o Gravador " 

1010 PRINT : PRINT "-— E tecle algo g 

uando pronto ... " 

1020 flS=INlE«: IF RS=" THEN 1020 

1030 ' Leitura de paranetros 

1040 X4ISR(0>: MOTOR 0FF 

1050 ' Calculo do nofle 

1040 FOR R-(SHCOOB) TO (SHC00F) 

1070 PÍ=CHRI(PEEK(R» 

1080 N!=»I»PI 

1090 NEXT 1 

1100 ' Ot.tp« {ornato 

1110 F=PEEXUUCO0O) 



1120 IF FO208 THEN 20 

1130 ' Calcula parâmetros 

1140 PI=FNPE(ÍHC010):'Poito inicial 

1150 PF=FKP£(SHC012>:'Ponto filai 

USO PE=FNPE<mC0I4):'Ponto execução 

1170 TN=(PF-PII»1 

11B0 ' Transforma dados decimais eu HEX 
1190 PII=HEXI(PI):PFI=HEXt(PF):PES=HEXS 
(P£mHI=RISHTI("0000''»H£XI(T«,),4> 
1200 ' Rpresenta dados sobre o arquivo 
1210 CES 

1220 PRINT "Rrguivo : -jNS 

1230 PRINT "Formato : RSSEHBI.ER" 

1240 PRINT -Endereco Inicial : *H";PIS 

1250 PRINT "Endereco Fual : HH";PF$ 

1240 PRINT "Porto de Execução : SH";PES 

1270 PRINT "Tamanho : SH";TI1I 

1280 ' Rpresenta comando de leitura 

1290 PRINT : PRINT : PRINT "lload";CHRI 

(34);"CflS:";NI;CHRS<34) 

1300 ' Rpresenta coitando de gravação 

1310 PRINT ' PRINT : PRINT "8save";CHRS 

(34);NI ! CHRI(34);' , ,IH ,, ;PIS; , ',SH' , ;PFI ! -, 

«.H";PEt 

1320 PRINTiPRINT 

1330 ' Rpresenta tecla 3 ser pressionad 
a 

1340 IF PK37000! THEN PRINT "Tecle 'F4 

'." ELSE PRINT "Tecle 'F5V 

1350 ' Coloca cursor eu pDsicao 

1340 LOCflTE 0,7 

1370 ' Termina a execução 

1380 EN0 



CHEGR DE SOLIDRO !!! 



K/rfeoíex ío, SfíflPfí, Ciranrfão, 
SfíftPfí Svf, fíruantfa, fórum ** 30 
e mais o mundo inteiro no teciado 
<fo seu micro. 



Temos Jtits <fí/>/>ie. 
<7 ue habifita o 



msx, tart-po 



seu m/cro a cone- 
ctar quaíquer correio e/eúronico 
ou base <fe dados 
com comunicação 
assíncrona. 
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FONES (OH)35-2Í50(VOZ) 
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Gerando sons 
noMSX 



ANTÔNIO F. S. SHALDERS 



GERANDO SONS NO MSX 

O seu MSX possui um processador de 
áudio modelo AY-3-8910, produzido pe- 
la General Instruments (EUA). Este inte- 
grado é do tipo LSI (Large Scale Integra- 
tion) e, embora não seja o processador de 
áudio mais sofisticado do mercado, é um 
dos mais facilmente encontráveis, além de 
ser de fácil implementação e operação. 

O BASIC possui uma instrução que 
permite trabalharmos diretamente com os 
seus 14 registradores, o SOUND, cuja 
sintaxe é: SOUND REGISTRADOR, 
VALOR. 

Além do SOUND, existe amacro-lin- 
guagem PLAY, que nos permite fazer 
bons trabalhos, desde simples vinhetas até 
acordes. 

O processador de áudio, ou simples- 
mente PSG (Programmable Sound Gene- 
rator), possui 3 canais, com 8 oitavas ca- 
da, num total de 96 notas musicais dis- 
poníveis, além dos geradores de ruído e 
envoltória. 

O PSG também controla a leitura de 
dados do gravador e as portas multi-uso 
de oito bits, que são as entradas para 
joystick. 

COMO GERAR UM TOM: 

Para gerarmos um tom de frequência 
pré -de terminada em um canal de' áudio, 
devemos carregar nos registradores rela- 
tivos aos ajustes de frequência fino e 
grosso do canal em questão, selecionar a 
envoltória desejada, o volume de saída e a 
atuação ou não do misturador de canais. 

O maior mistério para muitos é como 
calcular os valores necessários à carga dos 



registradores de ajuste de frequência, o 
que é, na realidade, muito simples, pois 
basta aplicarmos a seguinte fórmula, a fim 
de obtermos o valor principal: 

N - INT(C/F/32), 

onde C é o clock do seu computador, em 
hertz e Fé a frequência desejada. 

Os clocks do Hotbit e do Expert são 
3579545 Hz e 3575611 Hz, respectiva- 
mente, ou seja: aproximadamente 3.58 
MHz. 

Os valores que devem ser atribuídos 
aos registradores de ajuste fino (AF) e 
grosso (AG) podem ser facilmente obti- 
dos pelas expressões abaixo: 

AF = N MOD 256 
AG = N 256 

E bom notar que a resolução das 
frequências obtidas é inversamente pro- 
porcional à frequência de maneira expo- 
nencial, pois, à medida que aumentamos a 
frequência, a resolução diminui. 

Na faixa dos 100 Hz, por exemplo, a 
resolução chega a ser melhor que 1 Hz. Já 
na faixa dos 5 KHz, a resolução já cai pa- 
ra cerca de 400 Hz, logo não é muito ló- 
gico programarmos o PSG para gerar 
tons alternados de 5.000 Hz e 5.010 Hz, 
por exemplo, pois os dois tons gerados 
seriam idênticos. 

A menor frequência que pode ser ge- 
rada é de 4 Hz e a máxima vai além de 60 
Hz, o que não adianta muito, pois a faixa 
audível vai somente até cerca de 16 KHz, 
se seu ouvido for muito bom! 

A tabela 1 exibe os registradores do 
PSG e suas respectivas funções: 



REG. 


FUNÇÃO 


0 


A.F. canal A 


1 


A.G. canal A 


2 


A.F. canal B 


3 


A.G. canal B 


4 


A.F. canal C 


5 


A.G. canal C 


6 


Ajuste de freq. centr. do ruído 


7 


Controle do misturador 


8 


Volume do canal A 


9 


Volume do canal A 


10 


Volume do canal C 


11 


A.F. da freq. daenvolt. 


12 


A.G. da freq. da envolt. 


13 


Tipo de envoltória 



Tabela 1: Os registradores do 
AY-3-8910. 



MAIS SOBRE O PSG: 

O PSG possui um gerador de ruído 
branco que pode ser usado em conjunto 
ou não com os três canais analógicos. 

O chamado ruído branco é caracteri- 
zado por uma mistura aleatória de 
frequências de amplitudes iguais ou não. 
E exatamente o chiado que aparece cm 
um aparelho de televisão quando sintoni- 
zamos um canal livre. Efeitos muitíssimo 
interessantes podem ser conseguidos com 
o uso racional deste recurso do 
AY-3-8910. 

Um ponto fone do nosso processador 
de áudio ê, sem dúvida alguma, a capaci- 
dade de controle da envoltória. Mas o que 
é envoltória? A envoltória de um som (oti 
envelope, como dizem alguns) é a forma 
com que a intensidade ou amplitude varia 
em função do tempo 
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É graças ãs diferentes formas de en- 
voltórias que podemos distinguir o som de 
uma guitarra do de uma flauta, mesmo 
que ambos sejam exatamente da mesma 
frequência. 

É claro que existem infinitos tipos de 
cnvoltórias, sendo estas responsáveis pelo 
timbre e nuances dos sons. A envoltória 
pode ser representada desde uma função 
constante até funções ultra complexas. 

O nosso PSG não pode simular todos 
esses tipos de envoltórias, mas pode simu- 
lar quaíquer combinação de envoltórias da 
família "dente de serra", que inclui a 
triangular e a constante, gerando efeitos 
que chegam a ser estonteantes. 

O som das ondas do mar, por exemplo, 
é caracterizado por um ruído branco, cuja 
envoltória é da família senoidal (na reali- 
dade, é uma sobreposição de várias senói- 
des aleatórias), mas podemos obter ótimos 
resultados com a envoltória triangular! 

Já o som de uma explosão ou de um 
sino tem como envoltória uma função ex- 
ponencial inversa, do tipo Y = 1 / X, mas 
podemos obter resultados muito próximos 
disso com uma envoltória do tipo dente de 
serra, com a rampa negativa, o que carac- 
teriza um início abrupto, seguido de um 
decaimento suave do som. 

O registrador responsável por isso é o 
13 e podemos escolher oito tipos de en- 
voltórias de família dente de serra e cons- 
tante, ou algumas combinações destes. 

A tabela 2 mostra os tipos de envoltó- 
rias com as quais podemos programar o 
PSG. 

As frequências do gerador de ruído e 
do gerador de envoltórias também devem 
ser determinadas corretamente, a fim de 
obtermos resultados satisfatórios. 

O método usado para lai é semelhante 
ao do ajuste dos canais analógicos de saí- 
da. Para o ajuste da frequência dominante 
do ruído branco, não aconselho a usar 
fórmulas de espécie alguma, pois é melhor 
escolhermos "de ouvido" o que mais nos 



agradar. Os valores possíveis para carre- 
garmos o registrador 6 variam de 0 a 31, 
sendo que, quanto maior este valor, mais 
grave é o tom dominante. 

Já para o ajuste de frequência da en- 
voltória, necessitamos de uma fórmula do 
mesmo tipo da que mostramos para o 
ajuste dos canais analógicos de saída: 

N = C/(1100*F) 

Com esta fórmula, podemos obter 
frequências desde 0.1 Hz! 

Os valores a serem armazenados nos 
registradores de ajuste fino e grosso são 
achados da mesma maneira descrita ante- 
riormente para os canais analógicos. 

É importante notar que o gerador de 
envoltórias está ativo somente quando o 
volume do canal está no máximo. 

O CONTROLE MISTURADOR: 

O objetivo deste controle é combinar, 
selecionar, ativar ou deativar os canais de 
som e os geradores de envoltória e ruído. 
Esta seleção é feita através do valor atri- 
buído ao registrador 7 do PSG. 

Cada bit deste valor tem uma função 
específica e, para a parte sonora, são usa- 
dos apenas os bits de 0 a 5. Os bits 6 e 
7 são usados na verificação dos estados 
das portas multi-uso. 

Convém informar -lhes que os bits 
realtivos a este registro são ativos em ze- 
ro, e suas funções são mostradas na tabela 
3. 

Se desejarmos habilitar os canais A c 
B com somm puro (sem ruído) e o canal C 
com rufdo, devemos configurar o regis- 
trador 7 com o valor &B 00011100, ou 
seja: SOUND 7,56. Um canal pode ser 
usado para gerar tom e ruído simultanea- 
mente, mas não podemos ter mais de duas 
envoltórias diferentes nos três canais. No 
caso de termos duas, uma terá que ser, 
obritoriamente, uma função constante, ou 
seja: o volume do canal cm questão de- 



verá ser menor qu el6. 

Existem diversos editores musicais e 
sonoros para o MSX e alguns de altíssimo 
desempenho, como por exemplo, o 
SOUND (p/disco) e o SUPER SYNTH 
(na minha opinião, o melhor). Se você não 
possuir nenhum desses dois programas, 
não se desespere, pois o programa da lis- 
tagem 1, se usado com bom senso, pode 
trazer resultados muito bons na elabo- 
ração de sons complexos. 

Escrevam- nos enviando sugetões ou 
em caso de dúvidas, pois o objetivo desta 
revista é auxiliar o usuário da linha MSX. 



ENVOLTÓRIA 



0,1,2,3 e 9 
4,5,6,7 e 15 



I NNsNs 



Tabela 2: O registrador 13 e as envoltó- 



BIT 


FUNÇÃO QUANDO 




EM ZERO 


0 


Habilita o canal A 


1 


Habilita o canal B 


2 


Habilita o canal C 


3 


Habilita ruído no canal A 


4 


Habilita rufdo no canal B 


5 


Habilita ruído no canal C 



Tabela 3; Funções dos bits 0 a 5 do r< 
trador 7 do PSG. 



CPU 



14 



10 RE» 

20 REH lEVJSTfi CPU - «MO 1988 
30 REA «NTOMIO FERNANDO SHALOERS 
40 REH 

50 (EH CERANDO SONS HO USX 

100 KEIOFF:SCREEM:COLOI15,1:CLEAR 

110 PR I NT "HOTBIT OU EXPERT (H/E l " :PR IN 

I 

120 Rt=lMKETtllF AS="H" OR »>V IHEN 

C=3579545l aSE 1F RkVT OR HhV THE 

N WJ7K1II ELSE 120 

125 PR1NI-I FREOUEHCIH (4 a 140001","» 

WLUHE (O a 14) (li liga a nwltorii)" 

IKMT 

130 PÍ1H1 "CANAL fl:-:lNPUT "FREQUÊNCIA, 

VOLUHE -;FR,UR:PIINT 

140 IF FA=0 MH FA=4 

150 PR1MT "CANAL B:":INPUT "FREOUEHCifi, 

VOLUHE ";FB,VB:PRINT 

140 1F FB=0 IHEH F8=4 

170 PRIHT "CHHHL Ci-HWUT "FREOUENCIfi, 

VOLUHE -;FC,VC:PII«T 

ISO 1F FC=0 THEN FC=4 

190 KB=INT(C/FA/32):HB=IHT<C/FB/32):NC= 

1HTIC/FE/32) 

200 Ffi=Hfi HOD 254:GA=NA \ 254 

210 FB=H8 «00 254:G8=HB \ 254 

220 FC=NC HOD 254:GC=HC \ 254 

230 IHPUT "FREO. OOflIHAHTE 00 RUIDO (0- 

31) ";FR:P«IHT 

240 IHPUI "TIPO ÍIE ENVOLTORIA ";TE:PR1H 

T 

250 IHPUT "FREO. Dfl ENVOLTOS!» (HIH=.l) 
" ; UE:PRINT:IF UE=OTHENUE=.l 

240 HE=C/(1100IUE):FE=HE HOD 254:6E=HE 
\ 254 

270 PRIHT"TOH RTIVO Efl fi (S/N) "p 

230 G0SU8490HF fil="S" THEN Tfi=0 ELSE I 

F fll="H" THEH 18=1 

281 PR1NT AI:P8IHT 

290 PRIHT"TO« ATIDO EH 8 (S/H) "; 

300 G0SU8Í90:IF Ai="S" THEN TB=0 ELSE I 
F AJ="H" THEH TB=2 

301 PRIHT ÍWPRIHT 

310 PRIHT-TO» AT1V0 EH C (S/H) "; 

320 G0Sl'B490:[F fl$="S" THEH TC=0 ELSE I 
F fil="H" THEH TC=4 

321 PRIHT HI:PFÍ INT 

330 PRIHT"RUIDO RTIVO EH fl (S/N) "; 

340 60SUB490HF AI="S" THEN «A=0 ELSE I 
F HS="H" THEH 811=8 

341 PRIHT HI:PRIHT 

350 PR1NT-RUID0 ATOO EH B (S/H) "; 

340 60SU8490HF AI="S" IHEH RB=0 ELSE I 
F RS="H" THEH RB=I4 

341 PRIHT «:Píi«r 

370 PRINT-RU1D0 AT IVO Efl C (S/NI "; 
380 60SUB490:IF RS="S" THEH RC=0 ELSE I 
F fll="H" THEH RC=32 



381 
390 


PR INI BliPRINl 
H=0:H=TA+TB+TC+RA+RB+RC:CLS 




400 


SOU» 0,Ffl:PRINT"SOUN0 0," 


;Ffl 


410 


SOU» 1,6B:PR1NT"S0UND 1," 
SOU» 2,F8:PIINT"SOUN0 2," 


;Gfi 


420 


;FB 


430 


SOU» 3,6B:PRIHT"S0UH0 3," 


|Gt 


440 


SOU» 4,FCiPRIHT"SOUH0 4," 




450 


SOU» 5,GC:PRI»T"S0UW 5," 


;G C 


440 


SOU» 4,FS:PRINT"S0UHD 4," 
SOONO 7,fl:PRIHT-S0UHD 7,-|i 


;FR 


470 


1 


480 


SOU» 8,0fl:PRIHT"SOU» 8," 


;''« 


490 


SOU» 9,VB:PRIHI"S0UHD 9," 


r VB 


500 


SOUNO 10,VC:PRIHT"SOUND 10, 


■;K 


510 


SOUHO 11,FE:PRIHT"S0UHD U, 


;FE 


520 


SOUNO 12,OE:PRIHT"S0U» 12, 
SOUND 13,TE:PRIHT"S0UHD 13, 


"■GE 


530 


";TE 


480 


PRIHTSTRINSI(13,95):E» 




4?S 


m=IIKEYI:IF AS()"S"AHDRS0"H"ANDR5 



OVflNWMOV THEN 690 
691 IF fiS="S" OH RS="N- THEN RETURN 
700 IF BS=V THEN ftS="S" :RETURM 
710 IF fll=V THEN flS="N" : RETURN 



Cd*í jt «noi •} ecitor oe sins, 
falta ipantr nttôrtKts como os sens 

acecuaca ce ffMÚ#f?iH t viLun.es, ruieo e 
envoitória, ifli ii* ur-erno* o sou 
SewjíW, 'ramo w éwtulo, Q sett do naN 

este H sg« * caraueruaoo oor 
atacue e cecameno suiws, NxnltM» -a 
rijíío de néín frecúènaa (ornia-i 
qSMfHNtfi}. í envoitória que 
proporciona este efeito é a oe núnero 

'ara ijtívafMS isti eiwolióna, 
é (lecuisáric ue o vo.j«e to casa. e- 
çt#*»Jfl HXUI ajustaoo en "6. reito isso 
MWWM M»Wf a freauÉitaa u Meo, 
çue no caso é ;?rca úp 25. Jevenas atara, 
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resíiecíivo per:oco íl^ e .2',, ? 
selecionar o ruído st:vo no canai "fi", 

CfiKRL S : 0,'í 
Cflft 3 « C : 0,0 
FíEguíNCP 23 ÍUIDO : 25 
TI^ 3t ."SVOi-TÔRIR : ;4 
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MÁXIMAS E MÍNIMAS 

Programação estruturada 



J. L. FONSECA 



Esia é uma nova coluna, numa revista 
também nova e, como tal, vamos começar 
dizendo quais são os nossos objetivos. 

Nesta coluna serão discutidas dicas 
e técnicas de programação dc interesse do 
principiante e daqueles já mais avançados. 
Será uma coluna aberta a críticas e su- 
gestões, que deverão ser enviadas à revis- 
ta em nome desta coluna. 

Hoje, começaremos discutindo sobre 
um assunto que, para muitos, parecerá 
óbvio, mas, ainda assim, 6 importante pa- 
ra o principiante c até para alguns que já 
não são tão principiantes. 

Vamos, pois, falar sobre a progra- 
mação estruturada. Esta técnica, tão em 
moda nos últimos anos, nada mais é do 
que um método dc facilitar o trabalho do 
programador através da subdivisão de um 
programa em subprogramas mais simples, 
todos cies encadeados logicamente. 

Muita gente pensa que só, se pode 
programar es trut (iradamente em Pascal, 
C, Forth, ou outra linguagem criada, des- 
de a sua concepção, para este tipo de pro- 
gramação. No entanto, podemos progra- 
mar estruturadamente em qualquer lin- 
guagem, até em assembler. Um bloco po- 
de chamar, ou até conter, outros blocos, 
mas, unia vc/ chamado um bloco, este de- 
ve fazer a sua tarefa c retomar o coman- 
do ao que o chamou. Esta descrição é ba- 
sicamente, a descrição de uma sub-rotina, 
só que, com a restrição de que o ponto de 
entrada da mesma deve ser único, e, em- 
bora possa ter diversas saídas, todas de- 
vem retomar ao mesmo ponto. 

Os tipos básicos de blocos são os se- 
guintes: decisão, repetição definida, repe- 
tição indefinida ou condicional e bloco li- 
near. O primeiro é o equivalente em Basic 
a um bloco if... fhen... else, que executa 
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uma de duas ou mais açôes, dependendo 
de uma condição dada. O segundo é o 
equivalente à contruçáo for... next, que 
repete um conjunto de instruções por um 
número de vezes determinada. O terceiro 
seria um bloco que repete um grupo de 
instruções até que uma condição seja sa- 
tisfeita. Finalmente, o bloco linear é qual- 
quer grupo de intruções sem nenhum des- 
vio. As descrições anteriores fazem 
menção a instruções, mas, o mesmo 6 vá- 
[ido, igualmente, para blocos completos, 
ou seja, um conjunto if... then... é consi- 
derado como uma única instrução, assim 
como uma instrução gosub o é. 

O bloco deve sempre ser fácil de en- 
tender. Se um bloco está ficando muito 
complicado é hora de o subdividir em blo- 
cos mais simples. Do mesmo modo, o blo- 
co deve ter apenas uma função e esta de- 
ve estar claramente definida. Estes blocos 
devem ser sempre precedidos de co- 
mentários explicativos e, nos pontos mais 
complexos, ter comentários específicos ao 
ponto cm questão. Estes comentários po- 
dem parecer supérfluos, mas são a princi- 
pal ajuda na hora de modificar ou depurar 
um bloco ou programa feito há algum 
tempo. 

Uma outra vantagem de usar a pro- 
gramação estruturada é que os blocos são, 
em geral, independentes do programa 
como um todo e, assim, poderão ser usa- 
dos em outros programas, facilitando o 
desenvolvimento. Podemos e devemos, 
pois, formar uma biblioteca com os blocos 
mais úteis para utilização posterior e, 
aqui, vemos as vantagens dos comentários 
e de programar usando blocos auto-sufi- 
cientes. 

Vamos, agora, dar exemplos do dito 
acima, com alguns trechos em Basic, sen- 
do que tudo que for dito 6 válido para 



qualquer outra linguagem. 

BLOCO DE DECISÃO 

10 LET A = 5: REM VARIÁVEL QUE 
CONTEM O VALOR 
20 REM O BLOCO SEGUINTE VERI- 
FICA SE A QUANTIDADE EM A E 
SUPERIOR A UM VALOR DETER- 
MINADO 

40 IF A > LIMITE THEN PRINT 
-SUPERIOR" ELSE GOSUB 333 
50. 
60. 

333 LET A=A+1 

334 PRINT "VALOR DE = A 

335 RETURN 



Como podemos ver no trecho acima, a 
linha 40 executa uma de duas ações, de- 
pendendo de uma decisão, sendo que, 
após, qualquer delas continua no mesmo 
ponto, ou seja, na linha 50. Se houvesse 
necessidade de executar mais de uma ins- 
trução em qualquer das opções, estas de- 
veriam ser agrupadas dentro de uma 
sub-rotina e chamada dentro do bloco de 
decisão, como podemos ver na instrução 
que segue o else. Verifique que todos os 
ponlDS importantes estão comentados no 
programa, o que nos permite entendê-lo a 
qualquer altura. 

BLOCO DE REPETIÇÃO DEFINI- 
DA 

05LETA=1 

10 FOR 1=1 TO 10; REM CALCULA 
OS FATORIA1S ATE 10 
20 LET A=A*1 

30 PRINT I,A : REM IMPRIME O 
NUMERO E SEU FATORIAL 
40 NEXT I 



CPU 



No programa acima, o bloco entre as 
linhas 10 e 40 é repelido um número de- 
terminado de vezes. Esse número pode 
ser uma constante ou ser p 
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irada. 

No bloco de repetição indefinida, ao 
contrário do caso anterior, o número de 
vezes a repetir é desconhecido e depende 
de que se cumpra uma condição determi- 
nada. Essa condição pode ser testada no 
início ou no fim do bloco, dependendo do 
efeito desejado. 

BLOCO DE REPETIÇÃO INDEFI- 
NIDA 

TESTE DO INÍCIO 

10 IF A = 5 THEN GOTO 50 : REM 

TESTE INICIAL. SAI DO BLOCO SE 

SATISFEITA A CONDIÇÃO 

20 PRINT "APERTE UMA TECLA 

NUMÉRICA" 

30 INPUT A 

40 GOTO 10 

50 PRINT "VOCÊ BATEU O NUME- 
RO CERTO" 

BLOCO DE REPETIÇÃO INDEFI- 
NIDA 

TESTE NO FINAL 

10 REM INICIO DO BLOCO 

20 PRINT "APERTE UMA TECLA 

NUMÉRICA" 

30 INPUT A 

40 IF A < > 5 THEN GOTO 10 : 
REM REPETE SE CONDIÇÃO NÃO 
VÁLIDA 

50 PRINT "VOCÊ BATEU A TECLA 
CERTA" 

Como se vê nos exemplos acima, cada 
bloco é uma unidade lógica independente 
e poderá ser usado em outros programas 
com poucas ou nenhumas modificações. 
Os exemplos dados podem servir de mo- 
delo para você enar os seus próprios blo- 
cos, modificando, apenas, as condições e 
as instruções abrangidas pelos mesmos. 

Finalmente, para aqueles que estão 
achando que os comentários só ocupam 
espaço e que as sub- rotinas tomam o 
programa lento, aconselhamos a fazer o 
programa do modo indicado e, após estar 
pronto, remover os comentários de uma 
cópia que será usada para rodar. 

As sub- rotinas devem ser colocadas no 
início do programa, pois, quando o Basic 
procura um número de linha, começa pela 
primeira linha do programa e continua a 
pesquisa, uma a uma, até encontrá-la e, 
assim, se as sub-rotinas estiverem no iní- 
cio, serão encontradas mais rapidamente. 

Vamos, agora, experimentar o novo 
ripo de programação a tê a próxima 
edição, onde teremos novas dicas de como 
aproveitar melhor as linguagens disponí- 



Atéa 



CAPS LOCK 



Muitos programas cm Basic, ao solici- 
tarem do operador uma enirada, só reco- 
nhecem o que foi digitado caso a tecla 
CAPS LOCK esteja pressionada, ou vi- 

Para contornarmos este problema, e 
evitar uma linha de programa maior do 
que o necessário, podemos fazer uso de 
uma variável do sistema, a CPAST, que 
indica o estado da tecla CAPS LOCK. 

Caso CAPS LOCK esteja ativa, tere- 
mos em &HFCAB um valor maior que 
zero e menor que 255. Um valor igual a 
zero desativa a tecla. 

Exemplo: 

Poke &HFCAB.1 (ativa) 
Poke &hFCAB,0 (desativa) 



MÚSICA ALEATÓRIA 

Como será a música no ano 3000? 

O programa abaixo poderá dar-lhe 
uma dar-lhe uma idéia. 

Verifique que há um certo padrãe. A 
geração dos números aleatórios que estão 
sob a música é feita pelo micro segundo 
uma rígida regra matemática. 

O programa Música Aleatória é parte 
integrante do livro 100 Dicas para MSX, 
da Editor Aleph. 
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Slotse _ 
expansões 

ANDRÉ L. F. DE FREITAS 



Você já deve ter se indagado a respeito 
Uo sistema de SLOTS de seu MSX: como 
funcionam os cartuchos dc |ogos, interfa- 
ces, ou qualquer periférico conectado uo 
seu MSX via cartuchos. Nesie artigo, 
procurarei esclarecer as dúvidas a respei- 
to dos slots e páginas de memória que são 
um pequeno enigma na vida de usuários 
de micros padrão MSX. 

O microprocessador Z80 é um proces- 
sor de 8 bits capaz de endereçar 65536 de 
memória (64 Kbytes). Dc que forma, 
então, podemos ter 32 Kbyles de memó- 
ria ROM e mais 64 Kbytes de memória 
RAM para uso no micro? Como podemos 
ler, no exterior, micros do padrão MSX 
com expansões de memória de 128 Kby- 
tes? O responsável por isso é um circuito 
integrado chamado PP1, do inglês Pcri- 
pheral Programabie Interface, de identifi- 
cação 8255. A descrição mais detalhada 
deste "chip", termo que usarei daqui em 
diante, ficará para uma outra ocasião, 
pois, no momento, só nos interessa o tra- 
balho que ele realiza no micro. 

Este chip é uma interface paralela con- 
lendo 4 portas dc 8 bits cada. Uma destas 
porias, a qual chamaremos de porta A. 6 
responsável pela lógica de selcção de slots 
no MSX. Cada grupo de dois bits desta 
porto pode conter um número entre 0 e 3. 
0 qual vai indicar em que slot do MSX 
,i página de memória correspondente vai 
estar ativa. Para entender melhor, observe 

Como exemplo, se quisermos uma 
configuração semelhante a da figura 2. 
leremos o seguinte valor na porta A da 
PPI: &b00001010, Dividindo este número 
em quatro blocos dc 2 bits. teremos: 
&b00, &WX), &b!0. &M0. Em decimal, 
teremos 0, 0. 2 e 2, que. na ordem da pri- 
meira página ale" a quarta, significa que as 
duas primeiras estão alivas no slot 0 e as 
duas superiores no slot 2. Esta é uma das 
configurações dc memória mais usada no 



MSX c o seu micro pode, inclusive, ter 
esta configuração. 

Agora, vejamos, cada página de 
memória possui 16 Kbytes. Se temos 4 
slots, cada um com capacidade de conter 
memória em 4 páginas, podemos ter 
4x4= 16 páginas dc 16 Kbytes, perfazen- 
do um total de 256 Kbytes de memória. 

Cada página também pode ter uma ex- 
pansão para mais 3 páginas iguais sobre- 
postas. Mas esta seleção não é mais tão 
simples como a primeira. Portanto, o seu 
micro poderia ter mais 3 blocos de memó- 
ria de 256 Kbytes sobrepostos ao primei- 
ro, o que daria um total dc 1 Mbyte dc 
memória. Ótimo, não é mesmo? 

Aí, surge o problema de endereçamen- 
to de 64 Kbytes. Apesar de toda esta 
memória, linearmente, só podemos ter 64 
Kbytes ali vos. 

Provavelmente, você deve estar odian- 
do o Z80, mas não fique chateado. Você 
pode chavear páginas dc memória mu- 
dando o valor da porta A da PPI, poden- 
do acessar todas as outras páginas quando 
quiser. Mas lembrc-sc; nunca mais de 64 
Kbvles simultaneamente. 

Quando o seu MSX é ligado, os slots 
são [icsquisados à procura de memória 
RAM. Este teste é feito das mais altas po- 
sições de memória para baixo. A medida 
que o sistema encontra RAM, vai habili- 
tando esta memória para uso. Se houver 
mais de duas páginas contendo memória 
RAM entre os endereços &h8000 e 
&hFFFF, ele habilitará as páginas mais 
próximas ao slot 0. O seu MSX fica, 
então, com as páginas ^e^o e um no slot 
zero contendo todas as suas rotinas inter- 
nas de operação e o interpretador BA- 
SIC, que estão em ROM, nestas páginas, 
e a memória RAM livre nas páginas 2 e 3 
em algum outro slot. A partir daí, ele exe- 
cuta uma inicialização em variáveis de sis- 
tema e outras funções prioritárias para, 



depois, entrar no interpretador BASIC. 

Para saber qual a configuração de 
memória do seu MSX. entre com o pe- 
queno programa em BASIC da listagem e 
rode -o. Ele mostrará quais as páginas ati- 
vas do seu micro, pois a configuração po- 
de variar conforme o fabricante. O pro- 
grama faz uma leitura na porta &hA8 do 
micro, a qual endereça a porta A da PPI. 
O valor correspondente lido é, então, di- 
vidido em grupos de 2 bits e passado para 
decimal, informando em que slot estão as 
páginas de memória do micro. 

Agora que já sabemos como funciona 
a paginação de memória dos microempu- 
tadores MSX, podemos conhecer um 
pouco mais do sistema dc expansões. 

Quem possui uma interface de disco, 
cartão dc 80 colunas, ou mesmo um car- 
tucho de jogos, já verificou que o mesmo 
é conectado a uma das entradas de cartu- 
cho do micro. Cada entrada destas 
contém um barramento e uma lógica de 
selcção correspondente a um dos slots do 
MSX. Quando um destes slots contém um 
periférico ou um cartucho de jogo, a ini- 
cialização do sistema procura um certo 
conjunto de bytes na memória correspon- 
dente a estas entradas. Estes bytes contêm 
informações úteis do sistema para que es- 
te reconheça o tipo de periférico conecta- 
do. Estas informações podem indicar se 
existe ROM no slot, o seu endereço dc 
execução, se existe expansão de coman- 
dos a serem utilizados pela instrução 
CALL do basic. endereço de rotinas para 
manipulação dc dispositivos, etc. 

Como conclusão desta parte do artigo, 
vemos que o sistema de slots do MSX é 
algo de grande valor, pois, através dele, 
podemos manipular toda a memória e 
acessar um grande número de periféricos 
já existentes para a linha. Futuramente, 
em uma outra oportunidade, iremos ex- 
plorar mais o acesso a periféricos. Trata- 
remos, agora, somente da memória de 
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nosso microcomputador. 

A seguir, veremos um programa que 
permitirá a vocês, usuários, explorar toda 
a memória "adormecida" do MSX, 

Vamos supor que lemos um programa 
em linguagem de máquina que não neces- 
sita do interpretador BASIC para ser 
executado. É o caso dos jogos cm lingua- 
gem de máquina que você, provavelmen- 
te, possui. Vamos supor que o programa 
tem mais de 32 Kbytes de comprimento. 
Ora, se o micro só tem ativos 32 Kbytes 
de RAM, como poderemos carregar c 
executar este programa? Simples. O pro- 
grama é, geralmente, dividido em blocos 
menores com 16 Kbytes cada. Ao se er o 
primeiro bloco com a instrução BLO\D, 
este bloco é carregado em uma página 
ativa do sistema e seu ponto de entrada é 
uma pequena rotina que verifica se há 
uma página de RAM correspondente a 
página do interpretador BASIC (página 
1 ) em outro slot diferente do 0. Ao en- 
contrá-lo, muda o valor da porta A da 
PP1 para se configurar possuindo a página 
1 em RAM. A seguir, o programa é rea- 
locado para esta página e a porta A da 
PPI recebe, novamente, a configuração 
original do sistema, retornando o controle 
do micro ao interpretador BASIC. Pron- 
to. Temos 16 Kbytes de RAM contendo 
um programa em uma região da memória 



quelas páginas que, a princípio, pareeja 
não ter utilidade. Podemos fazer isto oom 
vários blocos de 16 Kbytes de programa, 
desde que tenhamos páginas de memória 
suficientes para contê-las. 

Outra limitação é a de nunca desati- 
varmos a página 0 da ROM, pois lá estão 
contidas as rotinas básicas de operação do 
MSX. Se ativarmos a página 0 em outro 
slot, o programa lá contido deve realizar 
algumas destas funções, sob pena de per- 
dermos o controle do micro. O mesmo 
é válido para a página 3, pois lá se encon- 
tram variáveis do sistema muito impor- 
tantes para o perfeito funcionamento do 
micro. Ao final do carregamento dos blo- 
cos, o fillimo deve conter uma rotina que 
manipule as páginas ocultas nos slots "va- 
zios" do micro, e teremos, então, um belo 
jogo ou utilitário com mais de 32 Kbytes 
de comprimento. Para sc rodar o progra- 
ma, basta configurar a PPI para ativar 
a página correspondente ao bloco que 
queremos executar e pular para um ende- 
reço naquele bloco. Ao final de execução, 
podemos alterar a configuração nova- 
mente e executar outro bloco. Pode ser 
um pouco estranho ficar pulando de um 
lugar para outro, mas o resultado, quase 
sempre, 6 um ótimo jogo ou utilitário, o 
qual já fez com que muitos de nós perdês- 



semos algumas horas utilizando-o com 
grande prazer. 

O programa da listagem 2 é uma pe- 
quena rotina em linguagem de máquina 
que procura uma página de RAM corres- 
pondente aos endereços &h4000 até 
&h7fff nos slots livres do seu MSX e rea- 
loca para lá um programa em assembler 
qualquer. Como exemplo de programa a 
ser realocado, temos o fornecido na lista- 
gem 3. Este programa somente imprime 
uma mensagem no vídeo sem a necessida- 
de do interpretador BASIC. Na listagem 
4 temos uma outra pequena rotina que só 
chamará o programa de impressão na pá- 
gina em que se encontrar e retomará ao 
interpretador BASIC. 

Observando a listagem 2, veremos que 
a rotina começa tentando escrever um va- 
lor na memória e, depois, tenta ler de vol- 
ta o mesmo valor. Este teste tem de ser 
feito duas vezes com valores diferentes, 
pois este endereço poderia ser em ROM e 
conter o valor testado, o que não iios le- 
varia a nenhuma conclusão. Se for encon- 
trada RAM, o programa passa a realocar 
o programa da listagem 3. Portanto, antes 
de rodar o programa da listagem 2, certi- 
fique-se de já ter digitado, também, o da 
listagem 3. Se o slot testado não puder ser 
usado, o programa continuará a procurar 
até encontrar uma área livre. 



20 REH SLOTS E EXPANSÕES 

30 RFH AUTOR: RNDRE LUI7 FREiTAS 

40 CL3 

50 R = IHP ( IHA8 ) 
60 RS = BINS i R ) 
70 FOR 1=1 TO El STEP 2 
80 81 = MIOS <flS,!,2) 
90 J - 3 - INT ( ]/? ) 
100 PRINT "PAGINA:"; J; " SLOT: " f VflL 
( "IH" ♦ BS ) 
110 NEXT I 



110 REH 
)20 RErt 
130 RErt 
140 REH 
150 RErt 
160 RErt 
170 RErt 
180 REH 
190 REH 
200 REH 
210 REH 



SLOTS F FXPANSÕES 
AUTOR: ANDRE FREITAS 

ESTE PROGRAMA BASIC COLOCA NA 
HErtOKIA AS R0T1NRS EM LiNGURGEH 
DE HABUINA CQNTIDRS NAS LINHAS 
DATA. 

ESTRS ROTINAS C0RRFSP0NDEH 

AS LISTRGEHS 2,3,4 DESTE ARTIGO 



220 REH PRIMEIRA ROTINA - LISTAGEM 2 
230 DATA 0B,A8,32,F0,EQ, 21 ,00,40 
240 DATA M f 03 r OB,R8,Ci T 04 t 3Z,n 
250 DATR E0,D3,A8,3E,AA,77,56,2F 
260 DATA 77,5E,7A,83,FE,FF,28,04 
270 DATA 10,E8,18,0B r 2;,00,El,ll 
280 DATR 00,40,01 ,30,00,ED,BO,3fi 
290 DATA F0,E0,03,R8,C9 
300 REH SEGUNDA ROTINA - LISTAGEM 3 
310 ORTA 21,OF,40,7E,FE,00,28,06 
320 DATA CD,R2,00,23,18,F5,C9,0C 
330 DATR 53,4C,4F,54,53,20,45,20 
340 DATA 45,58,50,41 ,4e,53,4f, 45 
350 OATR 53,07,00 

360 REH TFRCEIRA ROTINA - LISTAGEM 4 
370 DATR 3R,F1,E0,D3,R8,CD,00,40 
380 DATR 3R,F0,E0,D3,R3,C? 
390 REM 

400 FOR 1-IHEOO0 TO IHE034 

410 RERD AS:R=gAL!"iH"+RI):P0KE I,R 

420 NEXT I 

430 FOR I=IHE100 TO IHE122 

440 RERD AS:A=vRL("lrT+AS):POKE Í,A 

450 NEXT I 

460 FOR I=IHE200 TO IHE20D 

470 READ ASiA^ALíW+ASliPQKE l,A 

480 NEXT I 

490 CLS:PRINT"R0TINAS CARREGADRS NR MEM 
ORIfl" 
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Você deverá utilizar um monitor as- 
se mbler para entrai os programas na 
memória, mas, caso não possua um, não 
se desespere. Na listagem 5 eu forneço 
um programa em BASIC que colocará na 
memória, automaticamente, os programas 
2, 3 e 4 que estão em instruções DATA 
nas linhas iniciais do programa. 

Após os três programas estarem na 
memória, estamos prontos para rodá-los. 
Digite, no BASIC, as linhas abaixo: 



DEF USR = &HE0OO 
A = USR(0) 



Pronto, 

Agora, o programa de impressão já 
está em uma página de memória livre do 
seu MSX. Se você já digitou a listagem 4, 
estamos prontos para testar a paginação 
de memória do MSX. Repare que o pro- 
grama da listagem 4 lê um byte do ende- 
reço &hE100 que contêm a configuração 
da porta A da PPI para a página 1 ser em 
memória RAM. Esta configuração foi es- 
crita ali pelo programa 2 para sabermos, 
exatamente, onde é esta RAM e não cau- 
sarmos uma perda de controle do sistema. 
Digite, agora, no Basic, as seguintes li- 
nhas abaixo: 



DEF USR - &HE200 
A = USR] (0) 



Aí está a sua mensagem, sem que o in- 
terpretador BASIC estivesse ativo duran- 
te sua execução. O programa da listagem 
4 alterou a configuração das páginas de 
memória, desativando o interpretador 
BASIC, chamou a rotina de impressão a 
qual usa uma chamada a uma rotina do 
BIOS para imprimir, escrevendo direto 
através do processador de vídeo c restau- 
rou o sistema para que tivéssemos, nova- 
mente, o acesso ao BASIC. 

Gostaram? 

Espero que vocês não fiquem só por 
aí. As listagens são apenas pequenos 
exemplos do que se pode fazer com a pa- 
ginação de memória do MSX. Deixo, 
aqui, a sugestão para que vocês alterem à 
vontade estes programas c se utilizem 
destas rotinas quando precisarem de 
"mais memória". Criem à vontade, pois, 
como vocês podem ver, o MSX é um mi- 
cro novo no mundo e mais novo ainda 
aqui no Brasil, havendo, ainda, muita coi- 
sa a ser explorada. 

Estarei à disposição de vocês para su- 
gestões e opiniões, bastando entrar em 
contato com a diretoria técnica da revista. 

Espero que todos tenham gostado des- 
te primeiro artigo e, como já disse ante- 
riormente, não ficaremos por aqui. Ainda 
há muito a se explorar. Aguardem. 



i SLDTS E EXPANSÕES 
; flJTOR : ANDSá FREITAS 
, LISTAGEM 2 



D3 A8 
32 ft ít 

2i 43 

èi «3 

oe A8 

U H 

32 Fi E0 

3Í AA 

77 

Sé 

2F 



77 
5E 
7A 
83 

FE FF 
28 94 
18 E8 

ia m 

21 U íí 

li h 40 
ei 3e a 



3A FB E* Fm: 



o*g mm 

IN A, ( ÔA8H) 
LD < ttiFMM 
LD Kl,MiH 
LO B,3 
IN A,( 0A8M) 
ADO A, 4 

LO ( ÍE0FíH),A 
DUT ( ÈA8ri),A 
LO A, flAAH 

LD ( HL), A 
LO D,í ri) 
CPL 



LO í HL), A 
LD £,[ HL) 
LO A,0 
ADO A,E 
CP 8FFH 

JR Z.Achou 

DJNZ Loop 
A Fíl 



Le configuração da porta A oa PPI 
Salva no endereto ÍHEÍFÍ 
Endereco na página 1 
No. de SLOTS a testar 
Lê PPI 

Increienta bits correspondentes à 
página í na porta A da PPI 
Salva no endereco 8HE9FI 
Altera PPI 

Valor a ser escrito na ■esória 
equivale a 4819191919 
Escreve e 
lê da tenor ia 

CoijpienEiita este valor. Se a priíeira 
leitura for correta, o coapleaento 
será MMtm 
Escreve e 
lê da ueaória 



i Sota os oois valores lidos da marta 

i Se há RAM no SLOT, □ valor da saia 

i é ÃHFF e o teste está correto, 

1 então salta para a rotina de 

i transferência de blocos, senão 

. Decreucnta B e volta ao loop de teste 

i Não achando SAM ao fia do loop, sai 



fichou: LDHL.vEieeH ; Inicio do Moco a transferir 

LD DE,4Í99H ; Endereco de destino 

LD BC.HHK i Tauanho do Dloco 

LDIR i Transfere 



LD A,( ÔE9F9H) i Carrega A cm a configuração 

i original da PPI 

QUT ( 9A8H),A , Restaura valor na porta A da PPI 
ÍET 



i Ao final oeste prograaa tereaos.' 

i No Endereco &OFí - A configuração original da porta A da PPI 
i Nb Endereco âHE9Fl - A configuração para a tual a página i 
i está ea RAM 
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SLOTS E EXPMSÕES 
KTOJ: MM FRETTBS 



D!G K1MH 

WilT: EH WR i Mlw " n »t» 



2; r 4í 



-E I! 
28 »l 
3 «2 U 



LD HL,4O0F:i i Carrega Hl cob eaoereco da 

íensagen ( end. após realocar ) 
Carresa ft CM valor ce :?*a:ter 
Coapars cm -er; 
Se rV zerc er.cerra presrtta 
CSaaa rtttiM de inrcsuc :: KC 
Avanca caracte' Cl ca-iaa;ei 
UeUl para e la:: :e ipres^ãc 



Loop: LO A,< HL) 
CP f 

Jt Z.Fii 
CfiLL CHPUT 

ac hl 



IC 

53 4C 4C 54 
53 2t 45 2Í 
45 58 58 41 

4E a 4 ; 45 
53 



lesss m K» 

OEFK 'SLSTS : :»»«S3ES' 



DEF9 7 
DEF! t 



; SLOTS E EXPANSÕES 
I RUFOS : ANDRÉ FREITAS 
; LISTflSFÍi 4 

ORG 0E2OOH 

3fl F] EO LD A,( 0E4FTH) ; Carrega acunuiaoor com a 
; configuração de PPI saiva 
; pelo prograna da listacen 2 
0u7 ( 0fl8H),R j Fitera configuração oa"PPI 
; Chana programa ue íptpressão 
; aa página ] 

3fl FO FO LD A, ( OcOFOK); Carrega acunulador co« a 
; configuração nomal da PP! 
; salva peioprograw ca 
; iistage* 2 

03 fí OUT ( )ASH),A ; Sltera configuração 01 PPI 
C9 RET 



CD 00 40 



SLOTS E PÁGINAS DA MEMÓRIA 














VALORES DOS SLOTS CORRESPONDENTES 
ÀS PÁGINAS DE MEMÓRIA 








SLOTO 




SLOT 1 


SLOT 2 


SLOT 3 


PORTA "A" 
DA PPI 


PÁGINA 3 


0 
0 




O 
1 




1 

0 








BIT 7 
BIT 6 


l Bits correspondentes 
à página 3 


PÁGINA 2 


0 
O 




O 

1 




1 

0 




1 




BIT 5 
BIT 4 


2 Bits correspondentes 
à página 2 


PÁGINA 1 


O 
0 




0 

I 




1 

0 








BIT 3 
BIT 2 


2 Bits correspondentes 
à página 1 


PÁGINA O 


0 

o 




0 

1 




1 

0 








BIT 1 
BITO 


2 Bits correspondentes 
à página O 


FIGURA 1 



















EXEMPLO DE CONFIGURAÇÃO DE MEMÓRIA 



PÁGINA 3 
PÁGINA 2 
PÁGINA 1 
PÁGINA O 
FIGURA 2 



PORTA "A 
DA PPI 



Pág. 3 no Slot 2 
Pág. 2 no Slot 2 
Página 1 no Slot O 
Pág. O no Slot O 
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MATEMAGICA 

Autómato celular 



J. L. FONSECA 



Esta será uma coluna onde serão apre- 
sentados programas ou fragmentos de 
programas ligados à área da matemática 
recreativa, uma área por demais fascinan- 
te, apesar de pouco difundida entre nós. 

Os nossos computadores podem não 
ser tão rápidos nem ter uma resolução tão 
alta quanto os usados cm pesquisas nas 
universidades, mas são o suficiente para 
explorar alguns mundos e problemas bem 
interessantes. Ao longo dos meses, vere- 
mos artigos sobre gráficos de funções, 
criptografia, teoria dos números, lógica, 
autómatos, etc. 

Hoje, apresentaremos um pequeno mas 
interessante programa sobre um organis- 
mo matemático conhecido como autómato 
celular. Este organismo vive num univer- 
so simulado no computador, tendo regras 
evolutivas próprias, definidas pelo pro- 
grama. Esta classe de programas abrange 
um vasto campo de possibilidades, desde 
o programa aqui apresentado, com um 



universo unidimensional com células em 
156 possíveis estados evolutivos, até uni- 
versos multidimensionais, onde vivem cé- 
lulas com centenas de estados. 

Um dos mais famosos deste grupo de 
programas é o LIFE, com um universo 
bidimensional e células de dois estados, o 
qual será apresentado em outra ocasião. 

O programa da listagem 1 cria um uni- 
verso unidimensional, representado pelo 
vetor A%( ), o qual simula um círculo, ou 
seja, a sua última célula é adjacente à pri- 
meira. Cada uma das variáveis do vetor 
representa uma célula do universo e o seu 
valor representa o estado evolutivo da cé- 
lula. 

O programa representa as gerações 
sucessivas em linhas consecutivas da leia 
no modo 3, com as cores dos pontos re- 
presentando os estados evolutivos e, deste 
modo, podemos ver 48 gerações de 64 cé- 
lulas simultaneamente. 

Para usar o programa, respondas às 



perguntas como indicado. O padrão inicial 
deve ser fornecido como pedido, sendo 
que as letras de A até P correspondem aos 
números de 0 a 15. Em seguida, responda, 
com um conjunto de Os e Is, as perguntas 
sobre as influências. Esta ultima pergunta 
é que governa como as células vizinhas 
influenciam a célual sendo testada no 
momento (0 - sem influência, 1 influen- 
cia). Neste programa, são consideradas 
células vizinhas às duas células imediata- 
mente adjacentes à célula sob teste e as 
duas imediatamente seguintes a estas úl- 

O programa é simples e fácil de ser 
entendido e modificado para condições 
diferentes das dadas por mim. Sinta-se, 
pois, à vontade para modificá-lo e diver- 
tir-se com os belos padrões gerados por 
ele. 

Escreva- nos dando as suas sugestões e 
críticas, pois as mesmas serão bem vindas. 
E até à próxima edição, onde veremos 
novas curiosidades. 



140 DM 81(3): ' INFLUENCiRS 

150 DM RZíl ,63): ' UNIVERSO 

140 RS = --. BS = "": XI « 0 

170 KEY OFF: CLS 

180 IF XZ = 0 THEH GOTO 210 

190 PRMT Ri: MPUT "Deseja Mudar o padrão "-BS 

200 IF BS='T 0R SS = T THEH GOTO 250 

210 XI = 1 

220 Cl.S: PRINT SPC(7) f "Eitre cm o padr 

ao iBicial": PRINT " ( ate 44 caracte 

res entre R e P )"l PRINT 

230 LINE INPUT RS 

240 IF RS « THEH GOTO 220 

250 FOR IZ = 0 TO 43 

240 RZ(0,IZi = 0 

270 NEXT IZ 

280 IF LEN (flS))64 THEH RS=HlDSÍfiS,l,63 > 
290 FOR IZ = 1 TO LEN(HS) - I 
300 RZIO,IZ)=flSCiRIGHTS<AS,IZtl)) - 45 
310 NEXT IZ 

320 PR MT: PR MT: PRINT "Escolha a mfl 
uencia das células vizi- nhãs (0/1 1": 
PR MT 

330 INPUT "I - 2 "{«(O) 
340 MPUT "1 - 1 ";8ZU) 



350 INPUT "I ♦ 1 "jBZÍ2) 

340 INPUT "I * 2 ";BZ(3) 

380 ' VERIFICA E CORRIGE RS INFLUENCIAS 

400 FOR 11=0 TO 3 

410 IF M(1Z) O 0 THEH BZ(IZ)=1 

420 NEXT IZ 

430 SCREFN 3 

450 ' MICIfl fl FV0LUCR0 DRS CELULRS 
470 FOR JI = 0 TO 47 
480 FZ = JZ HOD 2: ' ÍNDICE DR G. . 
490 FZ ■ (JZ+1) HOD 2: ' MDICE DR PRÓXIMA G 
500 FOfi IZ = 0 TO 63 
510 RZ = (1M) HOD 43 
520 az ■ (IZ+2) HOD 43 
530 CZ=(IZ-1)H0D43:IFCZ(0THENCZ=43* CZ 
540 DZ=( IZ-2M0D43: IFQZíOTHENDZ=43+DZ 
550 RZ(FZ r IZ) = (8Z(EZ,flZ) » BZ<2) + RZ 
(EZ,SZ) * BIO) * RZÍEI.CZ) * BZ(1) ♦ fl 
Z(EZ r 0Z) I BZ(OJ) HOD 15 
540 PSET <IZI4,J«4>,RZ(FZ f lX) 
570 NEXT II 
580 NEXT JI 
590 BFEP 

400 BS=MKEYS: IF BS = " THEH GOTO 400 
410 GOTO 170 



O sistema de 
gravação 
cassete no 

ANDRÉ L F. DE FREnAS 



Todos os usuários de micros padrão 
MSX já estão familiarizados com o seu 
sistema de gravação. Estes micros se utili- 
zam de um processo de gravação chama- 
do FSK, dp inglês Frequcncy Shift 
Keying, ou seja, chaveamento de 
frequência. Aquele som que ouvimos 
quando acionamos o gravador com uma 
fita cassete contendo um programa e uma 
sequência de pulsos em frequências dife- 
rentes correspondentes a bits zeros e uns. 
Estas frequências são entre 1.200 hertz e 
4.800 hertz, dependendo da velocidade de 
gravação. Podem ser utilizadas outras 
frequências e, de certa forma, isto é fácil 
de se conseguir, alterando algumas variá- 
veis do sistema MSX. Mas não é aconse- 
lhável, pois os circuitos de áudio do MSX 
possuem filtros que eliminam frequências 
superiores, o que reduz a con fiabilidade 
da gravação. 

O que a maioria dos usuários não sabe 
é o que está por trás de uma simples ins- 
trução SAVE e como isto é processado 
pelo micro a nível de máquina. Pretendo, 
neste artigo, dar uma pequena visão do 
que se esconde por trás de uma instrução 
BASIC de operação cassete. 

Ao se salvar ou carregar um programa 
em cassete, o seu micro se utiliza de vá- 
rias rotinas contidas nos primeiros 16 
Kbytes de ROM, que vamos chamar de 
BIOS. Ah se encontram todas as rotinas 
básicas de operação do MSX, desde o 
controle do teclado, vídeo, som, ate" mes- 
mo a operação em cassete. 



0 REH LISTAGEM ] 
UO REH 0 SISTEMA DE GRAVAÇÃO CASSETE 
NO HSX 

115 REH REVISTA CPU - MAIO 1988 

120 REM ANDRE LUIZ FRANCO DE FREITAS 

130 PATA Cí),EA,00,21,00,E2,7E,FE 

140 DATA 0O,28,Q8,E5,CD,E0,OO El 

150 DATA 23,18,F3-,C0,F0 r 00,Cy 

140 REM CARREGA 0 PROGRAMA ASSEtíflLER NA 

170 FOR I=SHE0O0 TO 8NE016 
180 REAO A$: B=WL<"Wr*RS) 
IVO P0KE i,A 
200 NEXT I 

210 REH LE HENSAGEH E CARREGA NA MENOR I 
& 

220 LINE 1NPUT "HENSAGEH:";HI 
230 FOR 1=1 TO LfiKM) 
240 BWIM(M f I,U 
250 POKE WEÍFF+l,ftK(*S) 
260 NEXT I 

270 POKE 4HE1FF+1.0 I REH TERMINA HENSfl 

GEH COM BYTE ZERO 

280 REM CHAMA ROTINA EH ASSFHBLER 

290 OEFUSR=iHE0O0 i A=USR(0) 

300 PRiNT:PRINT"HENSflGEH GRAVADA !!!" 

310 END 
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As rotinas de cassete se dividem em 
dois tipos; gravação e leitura. Observe a 
tabela I. Nela são relacionadas cslas roti- 
nas e dados os endereços de entrada cor- 
respondentes. Não vou descrever estas 
rotinas, pois são, de certa forma, comple- 
xas, envolvendo conhecimentos de lin- 
guagem de máquina e do hardware do sis- 
tema. Não pretendo, neste artigo, exigir 
de vocês, leitores, grande conhecimento 
de assembler, mas uma pequena noção é 
muito útil. Observe que ainda existe mais 
uma rotina que trata somente do estado 
de operação do gravador cassete. 

Entre com os seguintes POKEs, pelo 
BASIC, para testar esta rotina: 



POKE &HE0O0.&H3E 
POKE&HE001.I 
POKE &HE002.&HCD 
POKE &HE003.&HF3 
POKE &HE004.0 
POKE&HE005.&MC9 



Agora digite: 

DEF USR = &HE000 
A = USR (0) 

Reparou nu "click" do gravador sendo 
acionado.' Experimente dar POKE 
■HE001.0 e, a seguir, novamente 
A = USR(0). O gravador deve desligar 
agora. Estes POKEs, acima, somente car 
regam, a partir do endereco AhEOOO, um 
pequeno programa em linguagem de má- 



quina que coloca no registrador A do Z80 
um valor e chamam a rotina de operação 
do motor do gravador. Isto equivale às 
instruções BASIC: MOTOR ON e MO- 
TOR O FF. 

Não é muito difícil controlar o sistema 
de gravação em assembler, mas deve ser 
tomado muito cuidado para não se gravar 
ou ler informações não coerentes. Uma 
simples questão de tempo, ou seja, demo- 
ra na leitura de um byte na fita, pode tirar 
todo o sentido do que o computador está 
lendo. As rotinas do BASIC estão escri- 
tas de forma a não permitir que coisas do 
tipo aconteçam, mas você também pode 
fazer o mesmo sem problemas. 

Como exemplo de utilização destas ro- 
tinas, dois pequenos programas são for- 
necidos nas listagens 1 e 2. O primeiro 
deles gravará uma mensagem na fita cas- 
sete e o segundo lerá esta mensagem de 
volta. Os programas são em BASIC, con- 
tendo rotinas em linguagem de máquina 
em linhas DATA. As rotinas em lingua- 
gem de máquina estão descritas em as- 
sembler, respectivamente, nas listagens 3 
e 4, para aqueles que querem se aprofun- 
dar mais no assunto. Agora, digite o pro- 
grama da listagem 1, prepare o gravador 
para salvar a mensagem e rode o progra- 
ma. Este programa pedirá a você para en- 
trar uma mensagem, carregará esta men- 
sagem na memória e, ao chamar a rotina 
em linguagem de máquina, passará a men- 
sagem para fita cassete. 

Digite NEW e entre com o programa 
da listagem 2. Este programa fará o in- 
verso do anterior, lendo a mensagem da 
fita através de uma rotina em assembler e 
a carregará na memória. O restante do 



programa BASIC se encarregará de im- 
primir a mensagem no vídeo. Quando es- 
tiver digitado, volte um pouco a fita cas- 
sete para o início do bloco que você sal- 
vou anteriormente e prepare-o para car- 
regar o bloco. Rode o programa e aguar- 
de a mensagem no vídeo. Satisfeito com o 
resultado? Esta foi a mensagem que você 
digitou no primeiro programa e, apesar de 
ler dado um NEW, aí está ela de volta, via 
cassete. 

Como conclusão, vemos que todos os 
comandos de gravação do BASIC utili- 
zam estas rotinas de gravação do BIOS, 
somente lembrando que estas são bem 
simples, fazendo, somente, as operações 
mais simples, enquanto que as rotinas do 
interpretador BASIC já contêm testes pa- 
ra você poder dar um BREAK na gra- 
vação, a seleção dos dados que vão ser 
salvos, a gravação daquele pequeno bloco, 
o "header" de identificação dos progra- 
mas e outras tarefas mais complexas. 

Nada disto lhe impede de usá-las, co- 
mo foi apresentado neste artigo, pois to- 
das as coisas simples podem, ainda, ser 
bem trabalhadas e muita coisa pode ser 
criada em cima destas rotinas. De onde 
vocês acham que vieram os copiadores de 
programas que muitos usam? E aqueles 
joguinhos que só se carregam com um 
carregador especial contido neles mes- 
mos? 

Para aqueles que vão se aventurar, 
leiam as listagens 3 e 4, tentando entender 
o que faz cada uma das rotinas e boa sorte 

mos com novas explorações pelo mundo 
do BIOS, descobrindo o que está por trás 
de outras instruções do BASIC. 



0 IKn (.ISTMO 2 
1 (0 ítfl U SISTEMA DE 6KWKWI CflSSETÉ 
m H3X 

120 REM rtfíM LUIZ FRANCO DE FREITF6 
Í30 DATfl CÚ,r.l ,00,21 ,00,E2,P.5,C3 
Í40 DATA E4,00,£'.,77,23,FE,00,?Q 
15Ú OhTÍh F5,CD,t7,Ú0,C? 
lúO REfl CflRBEGH 0 PROGRfiHH ílSSFriBLFR NA 
MENOR ! H 
170 F0« I4HE100 TO 4HE 1 f 4 
130 RF.fiO At: R=yflt..< "*H"+fll > 
190 POKE I,R 
200 NEXI 1 
210 CLS : KEí 0FF 
220 REh CHAMA ROTINA EM ASSEMBLER 
230 OEFUSR=SHE100 ! A=USR(0) 
240 PRINT "MENSAGEM l.TOfl: " :PB íNTiPS [ NT 
250 F-SHE200 
260 tePCEK(E) 
270 IF A=0 THEft GOTO 3101 
230 PRINT CHRSIFii; 
290 E=E+1 
300 GOTO 260 
310 FNO 
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CPU 



Menus e 
tabelas na 
screen 2 



ANDRÉ L F. DE FREITAS 



A maioria dos programas existentes, 
principalmente os aplicativos, utilizam al- 
gum tipo de menti para que o usuário pos- 
sa efeluar uma escolha entre as opções 
disponíveis, tornando, assim, o programa 
mais flexível. 

Existem várias formas de se apresentar 
um menu, tabela ou gráfico, sendo o mais 
bem elaborado e de melhor resultado vi- 
sual aquele no qual o menu ou tabela, ou o 
que desejamos apresentar, se encontra no 
interior de uma janela, a qual possui cor 
diferente do restante da tela. 

Inúmeras são as possibilidades para as 
janelas e as instruções utilizadas para seu 
processamento, mesmo em Basic, sáo 
poucas e de fácil compreensão. 

A principal instrução que utilizaremos 
6 LINE com sua opção BF. Sua função 6 
traçar uma linha, no modo gráfico, com 
base nas coordenadas fornecidas pelo 
usuário. Se a opção BF for fornecida, 
será traçado um retângulo, sendo que as 
coordenadas fornecidas correspondem 
aos extremos da diagonal do retângulo a 
ser desenhado. O retângulo também será 
preenchido com a cor especificada. 

LINE só pode ser utilizado na tela de 
alta resolução, portanto, outra instrução, 
a SCREEN 2, será utilizada para colocar 
o micro no modo de alta resolução. 

Digite o programa abaixo, rodando-o 
a seguir. 



10 SCREEN 2:CLS 
20L1NE(20,20M100,100). 15.BF 
S30 GOTO 30 



Na tela foi desenhada uma janela que 
possui cor diferente da cor de fundo da 
tela. 

A linha 30 se faz necessária para evitar 
o retorno do micro ao modo de texto. 

Temos agora, ao que parece, um pro- 
blema: se o micro está em modo gráfico, 
como colocaremos texto na tela? 

Todas as telas do MSX podem ser tra- 
balhadas como arquivos para escrita. Por- 
tanto, podemos utilizar a instrução OPEN 
do Basic para ter acesso à escrita em uma 
página gráfica. Esta instrução associa um 
número, entre 0 e 15, a um arquivo, no 
nosso caso a página gráfica (GRP:), sendo 
este número associado à instrução 
PRINT, a qual se encarregará de escrever 
na leia gráfica. 

Para posicionarmos o texto, usamos a 
instrução PSET, já que LOCATE não 
servirá por atuar somente nas telas de 
texto. PSET irá imprimir um ponto na te- 
la e, após esta instrução, a posição de im- 
pressão corrente no vídeo é a logo a se- 
guir às coordenadas de PSET. Se plotar- 
mos um ponto com a cor de fundo da ja- 
nela, este não será visível e ficaremos com 
as coordenadas de impressão de texto po- 
sicionadas no local que desejamos. 

Após esta instrução, podemos usar o 
PRINT # para escrever no nosso "ar- 
quivo", ou seja, o vídeo gráfico. 

lnlclua as linhas abaixo no programa 
anterior e rode-o. 
5 COLOR 1,4,4 

15 OPEN "GRP:" FOR OUTPUT AS 
# 1 

25PSET(30,30),15 

26 PRINT # 1, "TEXTO" 



Observe a presença de texto dentro da 
janela. Note que com poucas unhas de 
programa podemos criar uma janela e es- 
crever texto nela, mesmo em alta reso- 
lução. 

O programa fornecido na listagem 1 é 
um exemplo de menu, onde são apresen- 
tadas várias opções, cabendo ao usuário a 
escolha de uma delas. 

Fazendo uma leitura detalhada do pro- 
grama, vamos observar as coordenadas 
das instruções LINE e PSET. Na lista- 
gem, estas coordenadas estão sob a forma 
de um número multiplicado por 8. Foram 
apresentadas deste modo para facilitar a 
idéia da tela com gráficos e texto simultâ- 
neamente. A leia gráfica possui resolução 
de 256x2 1 92 pontos, enquanto a de texto, 
no modo SCREEN 1 , possui resolução de 
32x24 caracteres. Note que 32x8 = 256 e 
24x8=192. Pense na tela gráfica como 
uma tela de texto de 32x24 caracteres. E, 
sempre que quiser converter as coordena- 
das dos caracteres, multiplique -as por oi- 
to, para utilizá-las nas instruções gráficas. 

Observe também a subrotina que cria 
as janelas. A rotina foi melhorada com o 
acréscimo de instruções para criar uma 
"moldura" e um pequeno efeito de som- 
bra nas janelas. 

Leia atentamente o programa e obser- 
ve o que pode ser feito com janelas, apro- 
veitando as idéias aqui apresser.tadas em 
seus próprios programas. 

Nos próximos números iremos publi- 
car um programa em módulos que ofere- 
cerá vários recursos como calculadora, 
agenda telefónica, traçador de gráficos, 
etc. 
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170 SCREEN l: COLO» 15,4,4: CLS 

1B0 Xl=8:YI=7:X2=24:Y2=16:Cfl=l:CJ=10:GO 

SUB 770 

190 X=14:Y--8:CC=l:Hi="HEMU':G0SUB 900 
200 X=l 1 :Y=10:HS= "1 - TflSELfl~:60SUB 900 
210 X«U:W2:«!="Z - GRHF!CO":GOSUBTOO 
220 X=11:Y=14:HS="3 - JBNELRS" : EOSUS900 
230 X=4:Y=l:CC=15:CJ=4:HI="Exe«plos de 
utihzacao de": H9I 900 
240 X=4:»=2:CC=15:M="ja»elj5 eu progn 
MS.': GOSUB 900 

250 X=4:Y=20:CC=15:HS="Por flndre Freit 

is - 1988" : GOSUB 900: CM 

240 HS=INKFYS:IF Aí="" THE» 240 

270 fi=WL(AS):IF fl(l OH fl>3 THEH 1EEP:G 

OTO 240 

280 OH B 60SUE 300,440,450 
290 GOTO 170 

310 REH OPCBO 1 - TfllELfl 
330 CLS 

340 X1=2:Y1''6:X2=30:Y2=18:CJ=3:CF=1:G0S 
US 770 

350 X=l 3! Y-7:rtIí "TRPELM .CSRi 900 

340 X=4:Y=9:HI=" 

--: GOSUB 900 

370 X=4:Y=I0:HS="' «es ! Vendas ! Valor 
GOSUB 900 

380 ÍMlY=ll:m=" 

GOSUB 900 

390 X=4:Y'12:«S=" Jau 100 500,0 
0": GOSUB 900 

400 X=4:Y=13:HS=" Fev BO 400,0 
0": GOSUB 900 

410 X=4:Y=14:fll=" Har 150 750,0 
0"! GOSUB 900 

420 X=4:Y=I5:HJ=" Abr 190 950,0 
!■: GOSUB 900 

430 XM:Y=14:HI=" 

-■: G0SU8 900 

440 F0« 1-1 TO 4000: HEXT 1 

450 RETURN 

470 «TH DPCBO 2 - GRRFJCO 
490 CLS 

500 X1=2:Y1=?:X2=30:Y2=22:CJ=I4:CH=1: G 
OSUB 770 

510 X=12:Y=4:HS="GRBFIC0": GOSUB 900 
520 X=4:Y=8:«t="Mendas": GOSUB 900 
530 X=4:Y=10:HS="200 -": GOSUB 900 
540 X=4:Y=12:HI="150 -": GOSUB 900 
550 X=4:Y=14:HS='T00 -"i GOSUB 900 
540 X=4:Y=14:HS=" 50 -"I GOSUB 900 

570 X<4!Y«18!IB=" O 

--":G0SU8 900 



580 X=4:Y=20:HS= - Jl» Fe» «ar Ab 
p": GOSUB 900 

590 XI=9:Y1=14:X2=12:Y2=18:CJ=7:G0SUB 7 
70 

600 X1=14:YI=I4:X2=17:Y2=18:P=S:G0SUB 
770 

610 Xl=19:Yl=12:X2=2Z:Y2=18:Cfe2:G0SUB 
770 

620 X1=24:Y1=10:X2=27:Y2=18:CJ=10:G0SUB 

770 

630 FOI 1=1 TO 4000: HEXT I 
640 RETUJH 

660 REH OPCflO 3 - JAHELBS 
680 CLS 

690 X=!3:Y=2:CC=15:HI=" JANELAS": GOSUB 
900 

700 X1=4:Y1=4:X2=8:Y2=2!:CJ=6:G0SUB 770 
710 X1=4:Y1=4:X2=18:Y2=1C:CJ=2:G0SUB770 
720 X1=20:Y)=4:X2=30:Y2=16:CJ=13:GOSUB 
770 

730 X1=11:YI=1B:X2=28:Y2=22:CJ=7:GDSU8 
770 

740 X1=13:Y1=B:X2=17:Y2=20:CJ=14:6BSUB 
770 

750 FOR 1=1 TO 4000: HEXT I 
760 RETURN 

770 REH SUBROTIHH SUE CRIB JANELAS 
790 REH PBRBÍETBO:;: 
800 REH Xl.Yl - COORD. IHICIH1S 
810 REH X2.Y2 - COORD. FINAIS 
820 REH CJ - COR Dfl JANELA 
830 «EH CH - COR OA HOl.OURA 
850 LINE (X1I8,Y1IB)-(X218,Y21B),CJ,8F 
840 LIHE (Xll8,Ylt8i-(X2l8,Y2l8l,C»,8 
870 LIHE (XlI8t3,YltB-3)-(X2IB»3,Ylt8), 
CH,BF 

880 LIHE (X2«8,Yl»8MX2t8t3,Y2tB-3>,CH 
,BF 

890 RETURN 

920 REH SUBROTINA QUE ESCREVE 

930 REH NA PAGINA OE ALTA RESOLUÇÃO 

950 REH PBRBHETROS: 

960 SEH X,Y - COORO. HEHSBGEH 

970 «EH CJ - COR OE FUNDO 

980 REH CC - COR CARACTERES 

990 REH HS - HFHSHGEfl 

1010 OPEN "GRP:" FOR OUTPUT RS «1 

1020 PSET (X1B,YI8),CJ 

1030 COLOR CC 

1040 PRINT II, HS 

1050 CLOSE II 

1060 RETURN 
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JOGOS & HIGH SCORES 



Nesta seção, publicaremos os high scores 
de jogos e dicas de como melhorar o seu 
desempenho e ajudá-lo a salvar todas as 
princesas, planetas e demais seres que vi- 
vem em perigo, implorando nossa ajuda. 

HIGH SCORES 

AL1EN 8 4996 

BOULDER DASH 55.848 

BUCK. ROGERS 310.900 

CHORO Q "2.380 

CIRCUS CHARL1E 1.198.400 

ELI DON 94% 

FL1GHT DECK 6.410 

GALAGA 850.000 
INTERNATIONAL KARATE 999.999 

KING'S VALLLY 5.642.600 

KNIGHT MARE 238.020 

LAZY JONES 149.650 

OH SHIT 76.250 

POLAR STAR 289.900 

PYRAMIDE WARP 820.758 

RIVER RAID 73 450 

ROAD FIGHTER 998.675 

ROLERBALL 3.120.180 

SCION 501.100 

SOCCER 40-0 

SUPER COBRA 6.348.460 

SWEET ACORN 9.990 

TIME BANDITS 176.050 

Se você já obteve um high score mais 
alto dos aqui apresentados, ou em qual 
quer outro jogo, envie-nos sua pontuação 
acompanhada de alguma comprovação, 
como fotografia da tela ou descrição das 
fases percorridas, para que possamos pu- 



Se você é fera, nada mais justo do que 
o seu nome constar. na seção de High 
Scores de CPU. 

Os jogos que oferecem facilidades adi- 
cionais, com tiro múltiplo, vidas infinitas, 
etc, só serão considerados na sua versão 
original. 



0 «PH 

1 tfH leisTfl cpu - «bio ;%b 

2 lít flUF HONTY 

3 RFlf LEITOR PRRfl r(IL UIDRS 

10 aS:«ET0FF:C0Lmi0,',,l:SCÍEfJI2 
20 OPnrORPlTOROUTPOTflSKI 
30 F0RX=1 T02:PSET(29*1 tX, 106) .POIHTSTEP 
I0,0):PRINTIt],+CHRSO4)"nUF UIFDERSEHE» 
nOHTr , '»c„Ri(34):«EXT« 

40 C0L0R11:F0RD'1T02:PSFT(50*1*D,140),I 
:P«I«T«1,"1 -> InUmOnOE TOTRI-.":NECXTy 

41 C0L0R11:F0RE=1T02:PSET(50*1»E,160I,P 
OINTSTEP[0,0);PRINT»1 ,"2 -) W08S IHFIH 
ITBS.':»EXTE 

42 COLORI l JFORU-1 T02:PSET(50H *U, 180) ,P 
0imSrEP(0,0):PR»™,"3 -i H0R»flL.":«E 
XTUtCLOSEUl 

50 BMKPUTKI) 
60 IP RI='T'THE»i00 
70 IF flt="2"THE«I30 
80 IF M>"S''TrlErti50 
90 GOTO 50 

100 PL0flD"«0«TYr , ,«:BL0fl0 ,, milTY2 ,, 1 R:BL0 
RO~H0HTY3",R 

110 SLOflD")iONTY4' , ,»:3LOBO' , nONTY5' , ,R 
120 lLOB0"«O«TY6 ,, i0EFIlSR=SH870O:P0KESHfl 
CÍO,240:POKE«K9B08,0:PO(ESHB970,240:B=U 
SR(O) 

130 RLOBO-nO«TYr , ,R:BLOflO ,, IIO«TY2' , ,R:BLO 

flO' , «0«rY3- 1 R:!LOBD"IIOKTY4' , ,R 

1 40 ti QflD"nOnTY5",R:BL0BD"nONTY6" :0EFUS 

R=*H8700 : P01ESHB970 , 240 :fl=USÍ ( 1 ) 

150 8LOBD"«0»TYr,R:8LOBO"nOI.TY2",R:BLO 

B0'n0liTV3 ,, ,R:8L0filn«ITY4",R 

160 8L0BD , 'n0«TY5",R:BL0flD"r»lTrí ,, ,l! 
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0 rea 

1 rfh ame 

2 SFri LFiTDR Pflifl OIDAS INFINITAS 
10 CLS:IEIÍOFF:COLOR10,I,1:SCREEN2 
20 OPEN"GRP:"F0R01JTPllTflS«l 

30 F0RX=lT02:PSET(50«HX,lO4),POI»T3TEP 
(200 1 5):PPHíi«i,tMt(3<)"7BNK ,, OT!l3 
«iSEXTÍ 

«I C0L0R11:F0RU=1T02:PSET<50*1*0,Í40),? 
OINTSTEPIO.OliPPINTri," -) VIOBS INFIN 

42 COL0RJi™U'lTO2:PSFTt50*HU,180),P 
OI«TSTEP(0,0):P»INTIi,-2 -I NOBÍtFtL . ' : HE 

raciosai 

50 RMHMHl) 
60 1F BJ=T'THE«IOO 
70 IF flI=-2-IHE«12C 
90 GOTO 50 

100 SL0Bl)"CflS:":P0«EB9454,0 
110 0EFUS8=SH0000:8=USR(0) 
120 !LOB»"CflS.-,R 
130 ILOBO"CBS:",R 



0 DEU 

1 REA PROFANAI ION 

2 REA LEITO! PBRfl íiL VIOBS 

1 0 CLS:KFY0FF:C0L0R10, 1 , 1 :SCREES2 

20 OPE»T,RP:"FOROUTPUTfiS«l 

30 FORX=iT02:PSET(50*i*X,I04),POINTSTEP 

(200,5) :PRINT«l,rtBli(34i ,, PR0FflNfl™»-* 

CHRS(34):AFXTX 

41 COLOR11:FORV=IT02:PSETI50*1«,140),P 
OINTSTEP(0,0>:PRI«T»l,"! -i OIOBS INFIN 

iTfls.-inaw 

42 COLORI 1:F0RU=1T02:PSETI50+1+U, 180), P 
0INTSTEP(0,0):PRI»TIII,"2 -) MORHIIL . ~ sNE 
XTU:CL0SEI1 

50 flMNPUTKl) 
40 IF flJ-"l"THEN100 
70 IF BS="2"TBEN150 
90 GOTO 50 

100 BLORD~CRSs " , « :SL0H0"CB5 1 " , K : BLOHP - C 
BS:":P0XÇ<HC0B4,24Õ 

110 BLOBD"CRS:",R:BLOBD"CRS:",R:BLOflO' - C 
flS: ,, ,R:«LOflD' , CflS:",R:BL0A0 M CAS:",R 



0 RFh 

1 «FA GBIBBfl 

2 UFA LEITOR PBSfl AIL VIOBS 

10 CLS:KEYOFF:COLOR10,] ,1 :SCREEA2 

20 OPrN-GRPrFOJOUTPUTBSI) 

30 FORX=!T02:PSET(50tltX,104),POINT3TEF 

(200,5):PBINT«l,*CARJ(34)"GBLBGfl"*CHRÍ( 

34):NEXTX 

41 O)L0Rll:F0RV=lT02iPSET(50*l*V,140),P 
OIATSTEP(0,0):PRIAr»l, , 'i -> VIOBS INFIN 
ITftS.':»EXTV 

42 COLOS 1 1 : FORIH T02 : PSETI 50»! til , 1 80 1 , P 
0INTSTEP(0,0):PRINT»i,"2 -> MML.'lK 
XTU:CL0SE«1 

50 fll=INPUTS(l> 
40 IF AI="1"THEN100 
70 IF Rt="2"THF.«l50 
90 GOTO 50 
100 8L0fl0 M CBS:",R 
110 BLOBDTBS:" 
120 POKE SB9152,0 

130 DEFUSR=PEEK(tNFCC0)l254*PEEK(SAFCeF 
I 

140 B4JS8I0) 

150 B LOFIO-CRS: " ,» : ÍLORD'XflS : " , B 



0 REA 

1 RFA BOUNDER 

2 RFA LFITOR PflRfi AIL VIOBS 

1 0 CLS: <EVOFF:COLOR 1 0 , 1 , 1 : SCREEN2 

20 OPFN T.RP : "FOROUTP JTflS* 1 

30 F0RX=1T02:PSET(50»1 »X, 1 04) ,P0INT5TEP 

1 200,5 ) :PS I NT* 1 , tCHSK 34 ) "B OLTMBER "+CHeS 

(34):N£XTX 

41 COLOR11:FORV=1T02:PSETI50*1»V,140),P 
OI«TSTEP(0,0)!PRIAT1I,"I -) OIOBS INFI» 
ITflS.-:»EXTO 

42 COLORI 1 :F0RU--1 T02:?SET(50*i til, 180) ,? 
0MTSTEP(0,0):PRINT»1,"2 -) AORABL.":»E 
XTU:CL0SE«1 

50 fll^INPUTf (1 > 
40 IF BS'T'THEN100 
70 IF fli=-2-THE«110 
90 60T0 50 

100 BLORO-CHS ! " , H = BLOHD "CBS s " = POKESHSCS 

7,200:OEFUSR=iH8700:fl=USI<> 

110 RL0flD"CflS:",S:BL0fl0"CflS:",8:BL0BD"C 

BS:",8:BLOflO-CflS:-,«:BLOBO-CflS:-,R 
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LIVROS 



CURSO DE MÚSICA - Volume 1 
Editora Aleph - 144 Páginas - 
14x21 cm 
Barbieri, Piazzi 

Não tem sentido tentar se aprender 
teoria musical sem se tocar um instru- 
mento. A maioria das pessoas, porém, por 
não disporem de tempo e paciência sufi- 
cientes para adquirir uma razoável habili- 
dade num instrumento qualquer, margina- 
lizam-se do maravilhoso mundo da músi- 
ca. Neste caso limitam- se, se muito, ao 
papel de passivos ouvintes. 

Com o advento do MSX, porém, este 
ouvintes passivos passam a dispor de um 
eficientíssimo instrumento musical de 3 
vozes que vai lhes permitir aprender mú- 
sica interagindo (com um instrumento 
musical tradicional) sem que haja necessi- 
dade de um adestramento psicomotor. 

O objetivo principal deste livro não 6 o 
ensino de programação, apesar disso aca- 
bar ocorrendo de forma suave e didática, 
mas sim o aprendizado, por parte do lei- 
tor, da teoria musical em si, transforman- 
do-o num ouvinte ativo e em certos casos, 
até num compositor de talento! 



100 DICAS PARA MSX 
TÉCNICAS E TRUQUES DE 

PROGRAMAÇÃO 
Editora Aleph - 191 Páginas - 
14x21 cm 
Renato da Silva Oliveira 

Visando facilitar u programação em 
Basic, poupando tempo e esforço, o livro 
apresenta listagens de programas que po- 
derão ser utilizadas pelo programador em 
sub- rotinas. 

Dividido c 
deo, som, Ct 



capítulos (teclado, ví- 
, impressora, drive e 



para quem deseja aproveitar lodos os re- 
cursos disponíveis do MSX, explorando 
assuntos que não se encontram nos ma- 
nuais que acompanham o equipamento. 



DRIVES LEOPARD DE 3 1/2" 
NOVOS HORIZONTES 
PARA O SEU MSX 
Editora Aleph - 120 Páginas 

13x18 cm 
Carvalho Jr., Oliveira, Pjazzi 

Destinado aos usuários de drives de 3 
1/2", ou de qualquer drive de 5 1/4'", ou 
possuidores de acionador Leopard modelo 
DT 300 ou DT 350, da Technoahead. o 
livro fornece, de maneira objetiva e clara, 
informações necessárias para operação 
com o sistema operacional MSXDOS e 
Disk Basic. 

Todas as instruções do MSXDOS e do 
Disk Basic são comentadas, sendo forne- 
cidos exemplos e comentados os possíveis 
casos de erro que poderão ocorrer. 

Uma grande ênfase 6 dada à progra- 
mação com os comandos específicos do 
Disk Basic, e do MSXDOS. dando total 
suporte ao programador. 







Solicite os programas constantes desta revista 
gravadas em disco de 5 1/4", nao perdendo 
tampo com a digitação. 

Para receber o disco em sua residência, envie 
um cheque no valor de Cz$ 1.000,00, nominal a 
Rguia Informática. 
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CÉSAR MATTOS 



Este jogo foi baseado no velho Pac 
Man. 

Para fazer pontos, você deverá comer 
todas as vitaminas espalhadas pela tela, 
tomando cuidado com os guardiães que 
temam impedir, a lodo o custo, o seu ob- 
jerivo. 

Preste atenção na parte central da tela 
e tente apanhar as super vitaminas que de 
vez em quando aparecem. 

Para jogar, use as setas. 



20 TIní=OlKEYOFF:CLS:CcEflJi000:3Cíí;k , i , 

2:C0L0«15,i , - :CL3:ONSPRITEGOStó9ÍO:íJr>EN 

-ERP : TmMKjTPUTRS»! :STRIG(0>0N 

30 m= ,J, ':S!=-:RESTO!£i;00:F5;X=irai4:i 

•900S:nl=flS»MS<v'flLr«I"*LEFTS(3t,8))> 

40 II WirWIfWUTrHWIIHIt.l) ) I 

50 tiEXIX:SPRiTES(0)'BS*8i 

60 flí=-':8I=— :SESTDBE1270:rOI!)!=lT01*:R 

ESa0S:flS=flI»CH«S(WLI"Si"»0S)):NEXIX:S? 

7o 'vnimeis 

80 7I=0:TP=0:CFI=3 

90 n=l 54 :»=34: ' COOeDENFlOflS 

Í0O ' RP8ESFNTHCH0 

Í10 G0SUB1480 

",20 SCREEÍI2 

130 F-|ESfTt84,74):C5L0!!2: 1 Si«Ili:,"a«Cfl 
918 30FI":PÍE5EI(?S,90l:COLO»7:PR[Nm; , 
"apresenta" 

sss nemm,mimmtmum,tmf 
ou tsrmmm.wmMitmm, 

"apresenta" 

138 U«HJ8,»)-(1H,7ÍMUII6(78,!05!-( 
1 85, 105>:u»E(78, 701-176, 105):UriE<185, 

70) -<185,!õ5) 

■3? .:SE(7B,71)-(185,7!):Ll«E(78,;0íl-( 
185, l06):litíE(75,7i 1-179,1041 :LI«t(18í, 

71) -(18é,10él 

140 F08V"1T02:F08X1=40I0180:PUTSP8ITE4, 
(X1,50|:»EXIX1 

150 FBRX=70TB106:PUTSPÍITE4,UBO,X),12, 
OtkíXTX 

160 F88X1=150T0B0STE?-1:PUTSP11TE4,!X1, 
I40),12,0:8EXTX1 

170 F0RX=!06T040STEP-1:PUTSP8ITE4,(45,X 
1,12,0:NF.XTX 



180 NEXTO 

190 PUTSPRITE4,(-30,255),12,0:[FPLBY(0> 
THENGGT0190 

200 SCREEM3:C0lOS,HCLS 

210 LIKE(15,0)-(235,230),2,8 

220 F0RGB=lT02:r=0:yi=õ:a=R»0(l)«13t2:l 

FB=7TBENfl=4 

230 F08X=1T010 

240 COL08fl:Yl=Yl*4:Y=Yt|4:PSFT(4*Y*Yl,Y 

1*701,1 :PRmlll,llIDSl"Jatibreake',X, II 

250 S0UND7,56:S0U»8,15:F0R«--1TP20STEP4 

:S0U»O,K«5:«EXTK 

260 PUTSPRlTE4,(4»YfYl,100),B,0 

270 HEXTX:fl=Rk l 0(lH13»2:IFB=7THE»R=4 

2B0 Y=YHY*19:FORX=10T01STEP-1 

290 Y=Y-20:PSET(4»Y,70>,l:C0l0Rfl:PRINI« 

l.nlOÍCJawPrpaKe^X.l) 

300 PUTSPÍITE4,(4*Y,IOO),fl,0 

310 F0RK=?0T01STEP-4!S0W00,X15:»EXTK:« 

EXIX 

320 ONSTRIGGOSUB1470 
3-30 HEXIGG 

340 G0SiS14B0:UIS!S30:SCREE,<l:CBl081,7, 
2:lOCflTE4,5:PRI«TSTRlKGi(22,2231:i.0CflTE 
4,4:PRI»T"J S . 8 R E fl t E R"iL0CB7E4, 
7:PRINTSTRIM<22,220):PUTSPRITE4,(I22, 
801,13,0 

350 PUTSPRITE4,(122,80l,4,0 

340 LOCaiEl,22:PRl«T"Pres. parra de esp 

ao p/jogar";tF0RX=iI02000:tl£X!X:CDL0R, 

,;:G8T0200 

370 'CENBRI0 

380 COLORIS,! :SCÍEE«2:Sr«ITE0li:S7RlGi0) 
OFF 

390 C0LGR7:?8E5ET i 40, ■ ; : PR 1 «Hl , "J8UBRE 

BKER":C0L8R12:PRESETÍ 150,1 >:P8IKT«1,STR 

1W(CH,CHRS(249)):C0L0R14:PRESET(40,17 

5):PRIOTl,"BRCflDIfl SOFT 1986 - :C0LOR15 

395 COL0K7:PRESrr(41 ,1 ) SPRINT*] JflUBRE 

BlER":C0EBR12:PRESET(150,!):PÍI»Tll,3i; 

l«G!(CH,CBRi(249ll:COL0R;4.-PRESFT(4O,17 

4|:P81»I.I, ,, fiRCB0Ifl SOFT 1934": COLO» 15 

400 F0RX=1TO3:lIKE(30-X,12-XM220-X,17 

2-X),12,B:»EXTX 

410 L«(50,30 M200,30),4 

420 LI«E(50,50)-(200,50),4 

430 LI«E(50,70)-(200,70I,4:LI«F(50,901- 

(2Õ0,90),4:LI8E(50,110)-(200,I10),4:U» 
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E(»,13M-(80,!30>,4:UKEt50,!50)-iK! 
,!50),4 

MO -ORX-lBT3160STEF20:?RESF7<50,X>:Pi: 
ffltl,STRIN»iii9,MI(196>l!»EX7X 
445 O«IÍITFRVfiL=;5O0G0Sli61450 
450 ' COBANuO 33 JOGO 
460 .STERVfiLGN 

<7o iMW>riái2iwiem«!2 

480 FORX=30T020357F?6:Xl=X:X2=2ri-X»2C 
490 IFW6THEM0SUB840 
500 i FUC4THEHG0S JB8S0 
510 [FU)8ThF«UB860 
520 1FIB3THEKG0SÍ1B870 

530 imimasnsueno 

540 IFWflKKOSIMH 
550 IFW5ThEM5ll3900 

560 immtmmxnt 

570 G0SU8720M7X 

560 FORX=30TO2O357EÍS:X2=X:Xl=2H-X»2C 
590 IFIK6K1ÍG0SUB840 
600 ÍFIK4THEKG0SII8850 
610 IFIi)8 THEN G0S01 840 
620 >FV)3THQeOSUn7g 

630 iFiKionenosuisso 

640 IFlK8TnE«GOSUB890 

650 IFI/<5THEKG0SU8900 

660 Ir W( 6THEHGaSUBVl 0 

670 G0S38720 

680 NEX7X 

690 hhMhdh 

700 forx=2t010:?í)7s?ri7ex, (-20,255), 9, 

:KEXTX:IFRR<37nEKS0T0450 
710 6010580 
720 '«0». JRÍ) 

730 BHaeUMKn<tfl>llF»M»NI 
HEm-M 

740 IFN=1 24riNOH=74HN0r".fi6=l 7:i£r<6yTG760 
750 [Ffl=3fl»0»(203THEI»=St8 
760 iFFpliM)P01«T<rf*7,ri-4)<>4Ri8)POI«T(l. 
,f<-4)< i 4fiW0fí> 7THENM=f!-£0 

770 in — mrwT^ntXHMrtuni 

ft,ft+;6)O4fiH0h(:507HEWt=mí0 

760 PU7S?RI7El,(«,i1),9,i 

790 lFh=l 24hN0H=74RN0FlHu- ■ FriEKPLflY "V i 3 

L 32fl!.COI)CEH ,, :77=77*iOO:?7=FT*lõO:G0SlJBl 

460 

600 lFP01ríT{K+3,rt+d)=150R?0IHT(l)+3,>l+8> 
=77HE«TP=7?» l :P7=P7tl0:P«ESE7(H,Ht4):Cu 
L0Ri:PRI«T«l,CHRS(219.>:C0 L [H15:PLfir^3 
SOÍ100004Cr:77=TT*10:iF7?=1517HEIt60S!J3 
1480I80SÍJ61050 

810 1F77>-5000THE«IÍ=0:CH=C«»1 :pLflY"V15 

725504l8DL4BL8Gl83L4ClS»L1GL32 , 'íC0LOR7: 

?RFSFT(40,l):»RM7Kl,"jaulREflíER":C0L0R 

í2:PRE3ET(150,1):PRIKT(H,3TR:NGI(CH,CHR 

S(249))!C0l3R15 

820 RtTURN 

830 •MP8ES5.0DS IMM1S0S 



840 PUTSPB I T£3 , ( X2 , 30) , J 0 ,0 : 8Í FURh 
650 ?U7SPR]7E4,(Xl,10),12,0:RE7l'S» 
860 PUTSPRITE5, (Xi .50) , 1 3,0:RETURN 
370 PUTSPRITE6,[X2,70),8,0:RFTURK 
SSO PUTSPR17E7,<Xl,90),2,0:REriiRlt 
S90 PUTSPRI7E8, 1X2,110), 7,0:RETURK 
900 PI)TS?RITE9,(Xl,130),9,0:RETt)RH 
910 PUTSPRITE';, ^2,150), 14,0:RE7URk 
920 IFPL8Y(0)Itt*920 
930 POUND7 , 56: SP 3 ITEOFF : SOUMOS, 1 5 : SOUHO 
l,0:FCRÍ=5070200S7E?5:SG«0,rtlHHI>e 
5:PHTSPRITEi, (H,M),SN0(7 i»7,'i :«EXTY:S0u 
N03.0 

940 CH=M-;:IFCH=OTn£íiG070990 

950 C0l0Rl:?RESE7(40,l):PR!li7«;,STRÍk5i 

w,aaaw\ 

960 K=124:M74:G0Sj3720 

970 C0l0R7:PRE5FT(40,;;:PSI«7«i, ,, jS«iRÍ 

RXER-iCOLOR^PRESETUSO.DiPRim.SFR 

l»GS<a,CH»S(249)l:C0LO»15 

980 FORS=3T010:PUTSPRITES,(-20,255),l,0 

:»EXTS:SPRITE0«:RF7UR» 

990 '«OT.FIMBLIZRCHO 

1000 PRESETI82,78) iCOLORl :PR1NT«] ,STJI* 
Gt( 1 2.CHRK219) ) :C0L3R1 :P«ESE7(B0,96) :? 
JINT»í,STRIRGS(12,í:«RI(219>>:PRESE7<3«, 
7S):C0L0R10:?imTíl,"FI« DE J0G0":PRESE 

r(w,miiwu(ni,i»w — ytitftiw 

ttl,'?0OTS" 

1 01 0 PLflr VI 5L1 605CC04Sa6FE0CCCCC M , -líl 3 
Ll 604CC0EFG8B05CCCCC ","V1 403L4CCC L .*: " 
020 F0RY=lTG10:P0TSPRITEÍ,(0,0),l,0:itE 
XTY : F0Rr= 3 TO 1 000 : KEXTY : CLOSE 
1030 IFpLflY(0)TRE>l!030 
1040 RUN 

1050 '00. TP=152 

1060 IHT£ROflLOF-:S?R17EOFF:FGRY=2T010:P 

UTSP8I7EY, (-20,255), 9,1 :NEX7Y 

1070 PRESFT(74,77):raL0R12:PRl«T»l,?T i - 

PONTOS :F0RX=1T0200:NEX7X:C0l0R1 :?RES£I 

(74,77):PRi«7»l,STR[«8S()5,CHRI(219)):C 

GL0R15 

1080 TP=0:il=124:í=74:P0 I 3?RI7Fl,(ll,lt),9 

1090 FDRT=,87016057£P20:PRESft(50,tl!PR 
llilll ,3TRIN6I( 1 9,CH«S( 196) ) :NEXTY:3PR 17 
EDN:1«TERURlON:RETURN 
1100 OBTfi 0000000000000000 

ino oflifl ooo) 1 1 1 1 1 1 m ooo 
1120 06T8 ooniniiiiiiioo 

1130 DfiTR 0111111111111110 

ii4o 0676 nioooinioooii; 

1150 DflTR mMOililOlOlil 
1160 OflTfi lllOOOllUOOOlll 
1170 0BT6 lUMOilIiMOin 

uso ofiTfi nmimimin 
1190 DET3 niHinnimis 



;2oo Osi* insnmiiDii] 


1400 DflTfl OOOOOOOO 


izio oRTn niiiooooooiíin 


1410 DflTfl OOOOOOOO 


1220 data imtooowinn 


1420 OflTfl OOOOOOOO 


i23o dbts iimimiiinii 


1430 BEEP:G0T01430 


12(0 DflTfl OiOiSlOlOlOlõlOl 


1440 DHTfl OOOOOOOO 


■250 DflTfl 1010101010101010 


1450 C0L0»7:?RESFTÍ122,76):PR1KTI1,CHII 


1260 


(l;Cn«i(66),'FLflG=l:0*l»TE!«fiL=30OC0SUIl 


1270 DHTfl 11111111 


460:COlOR15:RETUR« 


1280 OflTR HII1111 


1460 CDi-OST :PSf 3£' r tl2i.7S) .-PS INTUI , CHRS 


1290 DflTfl 10011001 


(2i9):fLflG=OiONINTERVf,L=1500GOSUB1450:R 


1300 DflTfl 10111011 


ETURN 


1310 DHTfl 10011001 


1470 COLOR , , 1 IPIAT L32CI 6DEFGfl305C■ , :RET 


1320 OflTfl 11111111 


URN370 


1330 DflTS 10000001 


14B0 SOU»D7,56:PLh'r"T250 ,: ,"T250":PLflT"D 


1340 DflTfl 11000011 


1115000^4", "S9H400l4" 


1350 OflTfl 11100111 


1490 PLflY"ú4Rr,"G3Cã.E6.G4.G4." 


1360 DflTfl 11111111 


1500 Pi.flr04C8.E3.G4.G4.", "ir 


1370 DflTfl 11111111 


'510 PLfll"'04f4.:4.D4.","03r4.E4.D4." 


,330 OflTfl 01010100 


1520 P.flí"04G4.G4.E4.","03í4.E4.C4" 


1390 DflTfl 01010100 


1530 SETuRN 



ASSINE CPU 



Para fazer a assinatura da revista CPU, preencha o cupon abaixo, 
em letra de forma, remetendo-o a Águia Informática Ltda. 

A cobrança sera efetuada através do Banco Bamerindus, nao sendo 
necessário o envio de dinheiro. 

O valor da assinatura, de seis meses, e de Cz$ 1.100,00. 



Dados para f attramenta 

nome: 

endereço: 

bairro: 

cidade: estado: cep: 
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MSXWORD 3.0 



DESTINADO AQUELES QUE DESEJAM UTILIZAR O MSX PARA ELABO- 
RAÇÃO DE TEXTOS, CARTAS, MEMORANDOS , MANUAIS E OUTROS 
SUBSTITUINDO COM ENORME VANTAGEM AS MAQUINAS DE ESCREVER 
ELETRONICAS. 

TAMBÉM Ê POSSÍVEL A EDIÇÃO DE PROGRAMAS FONTE EM DIVER- 
SAS LINGUAGENS TAIS COMO ASSEMBLER, COBOL, PASCAL, C ETC. 



CARACTERÍSTICAS: 

- 64 CARACTERES POR LINHA VISÍVEIS NA TELA; 

- MOVIMENTAÇÃO E COPIA DE BLOCOS; 

- MODO DE INSERÇÃO; 

- BUSCA E SUBSTITUIÇÃO AUTOMÁTICA DE PALAVRAS; 

- ACENTUAÇÃO DE CARACTERES NA TELA; 

- CONVERSÃO DE ARQUIVOS EM FORMATOS DE OUTROS EDITORES 
DE TEXTO PARA O FORMATO MSX-WORD; 

- UTILIZAÇÃO SIMULTÂNEA DE ATÉ DOIS DRIVERS; 

- COMPATIBILIDADE COM EQUIPAMENTOS MSX 2; 

- CONFIGURÃVEL PARA DIVERSOS TIPOS DE IMPRESSORAS INCLUIN 
DO AQUELAS QUE NÃO SEGUEM O PADRÃO ABNT OU ABICOMP. 




CIBERTRDF1 



Bua Conselheiro Saraiva, n° 838 CEP 02037 São Paulo>8P 
Informações e Vendas Fone: (011) 298-3299 



100 DICAS 
PARA 




eletrõnicos 



MSX 








linguagem 
de máquina 

_IE_MSX 



Noa.» llw* pod«a .e, enconwdc, «a a lo|a. * .ompa«âo Sa ■> °» 

• * tffJT^os Iver disporeis, enira em oonlalo coaosoa pelo lelelone (011) 843-3202. 

O oa»i. de «ebê-lo. <*, dei» d, eiwi.r o aapc™ «a» à EDITORA ALEPH CP. 

01498 - SÃO PAULO-SP. 
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